zynk/irssi
2
0
Fork 0
mirror of https://github.com/irssi/irssi.git synced 2026-08-10 20:33:46 +02:00
Code Issues Projects Releases Packages Wiki Activity

add ipaddr and family to connrec and perl SERVER_REC

Browse source
This commit is contained in:
steering7253 2024-11-02 17:08:32 -06:00
commit 26fd0585cd
No known key found for this signature in database
GPG key ID: 66B26E9D823D8647
4 changed files with 12 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/perl/perl-common.c
View file

@ -287,6 +287,8 @@ void perl_connect_fill_hash(HV *hv, SERVER_CONNECT_REC *conn)
(void) hv_store(hv, "type", 4, new_pv(type), 0);
(void) hv_store(hv, "chat_type", 9, new_pv(chat_type), 0);
(void) hv_store(hv, "chosen_family", 13, newSViv(conn->chosen_family), 0);
(void) hv_store(hv, "ipaddr", 6, new_pv(conn->ipaddr), 0);
(void) hv_store(hv, "tag", 3, new_pv(conn->tag), 0);
(void) hv_store(hv, "address", 7, new_pv(conn->address), 0);
(void) hv_store(hv, "port", 4, newSViv(conn->port), 0);