summaryrefslogtreecommitdiff
path: root/src/plugins/scripts/perl/weechat-perl.c
diff options
context:
space:
mode:
authorEmmanuel Bouthenot <kolter@openics.org>2006-04-08 21:03:31 +0000
committerEmmanuel Bouthenot <kolter@openics.org>2006-04-08 21:03:31 +0000
commit1f03444a6b4597d799add41d77e450e722abc105 (patch)
tree59bfbb8866d8ad74dc01dbb5adcfa4ed52147b29 /src/plugins/scripts/perl/weechat-perl.c
parentc525b231e4a5c39d708fdf25b87c25f3d8a769bb (diff)
downloadweechat-1f03444a6b4597d799add41d77e450e722abc105.zip
Added hostnames associeted to nicks in plugins/scripts
Diffstat (limited to 'src/plugins/scripts/perl/weechat-perl.c')
-rw-r--r--src/plugins/scripts/perl/weechat-perl.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/plugins/scripts/perl/weechat-perl.c b/src/plugins/scripts/perl/weechat-perl.c
index d2e3aa297..4bbddebb6 100644
--- a/src/plugins/scripts/perl/weechat-perl.c
+++ b/src/plugins/scripts/perl/weechat-perl.c
@@ -1280,7 +1280,8 @@ static XS (XS_weechat_get_nick_info)
{
HV *nick_hash_member = (HV *) sv_2mortal((SV *) newHV());
- hv_store (nick_hash_member, "flags", 5, newSViv (ptr_nick->flags), 0);
+ hv_store (nick_hash_member, "flags", 5, newSViv (ptr_nick->flags), 0);
+ hv_store (nick_hash_member, "host", 4, newSVpv (ptr_nick->host, 0), 0);
hv_store (nick_hash, ptr_nick->nick, strlen(ptr_nick->nick), newRV_inc((SV *) nick_hash_member), 0);
}