summaryrefslogtreecommitdiff
path: root/src/perl/irc
diff options
context:
space:
mode:
authorAilin Nemui <ailin@esf51.localdomain>2014-06-26 10:26:59 +0200
committerAilin Nemui <ailin@esf51.localdomain>2014-06-30 00:57:07 +0200
commitccc64c0050478dc0567ce9bb22dc75d541f8477e (patch)
treeb9243ab4ef8fec8c7931dba808c861991ebd8d88 /src/perl/irc
parent2e6f16c0faf345245c5a224de529827a51203d1c (diff)
downloadirssi-ccc64c0050478dc0567ce9bb22dc75d541f8477e.zip
forward alternate_nick to Irc::Server attributes
add the missing alternate_nick in Irc::Server by making an additional call to the Irc::Connect filler. this is not quite ideal but might need bigger refactoring otherwise.
Diffstat (limited to 'src/perl/irc')
-rw-r--r--src/perl/irc/Irc.xs1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/perl/irc/Irc.xs b/src/perl/irc/Irc.xs
index 22a87384..601ba852 100644
--- a/src/perl/irc/Irc.xs
+++ b/src/perl/irc/Irc.xs
@@ -11,6 +11,7 @@ static void perl_irc_connect_fill_hash(HV *hv, IRC_SERVER_CONNECT_REC *conn)
static void perl_irc_server_fill_hash(HV *hv, IRC_SERVER_REC *server)
{
+ perl_irc_connect_fill_hash(hv, server->connrec);
perl_server_fill_hash(hv, (SERVER_REC *) server);
hv_store(hv, "real_address", 12, new_pv(server->real_address), 0);