aniani/irssi
1
0
Fork 0
mirror of https://github.com/irssi/irssi.git synced 2024-11-03 04:27:19 -05:00
Code

Merge pull request #65 from ailin-nemui/perl-irc-poly

Browse Source 
forward alternate_nick to Irc::Server attributes
This commit is contained in:
ailin-nemui 2015-12-09 12:00:30 +01:00
commit 57576bb75f
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
src/perl/irc/Irc.xs
View File

@ -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) 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); perl_server_fill_hash(hv, (SERVER_REC *) server);
(void) hv_store(hv, "real_address", 12, new_pv(server->real_address), 0); (void) hv_store(hv, "real_address", 12, new_pv(server->real_address), 0);