From ddfb8dea3a056d4b779ca538c7a16e5f10489720 Mon Sep 17 00:00:00 2001 From: Timo Sirainen Date: Sun, 7 Jan 2001 09:59:21 +0000 Subject: [PATCH] updated git-svn-id: http://svn.irssi.org/repos/irssi/trunk@1090 dbcabf3a-b0e7-0310-adc4-f8d773084564 --- src/perl/irc/Irc.xs | 4 ++-- src/perl/irc/module.h | 1 + src/perl/irc/typemap | 2 ++ 3 files changed, 5 insertions(+), 2 deletions(-) diff --git a/src/perl/irc/Irc.xs b/src/perl/irc/Irc.xs index d8122a90..4ed3e995 100644 --- a/src/perl/irc/Irc.xs +++ b/src/perl/irc/Irc.xs @@ -78,10 +78,10 @@ static void perl_netsplit_server_fill_hash(HV *hv, NETSPLIT_SERVER_REC *rec) hv_store(hv, "count", 5, newSViv(rec->count), 0); } -static void perl_netsplit_channel_fill_hash(HV *hv, NETSPLIT_CHANNEL_REC *rec) +static void perl_netsplit_channel_fill_hash(HV *hv, NETSPLIT_CHAN_REC *rec) { hv_store(hv, "name", 4, new_pv(rec->name), 0); - hv_store(hv, "nick", 4, irssi_bless(rec->nick), 0); + hv_store(hv, "nick", 4, irssi_bless(&rec->nick), 0); } static void perl_autoignore_fill_hash(HV *hv, AUTOIGNORE_REC *ai) diff --git a/src/perl/irc/module.h b/src/perl/irc/module.h index 59fcd03c..6e6e8e27 100644 --- a/src/perl/irc/module.h +++ b/src/perl/irc/module.h @@ -24,5 +24,6 @@ typedef BAN_REC *Irssi__Irc__Ban; typedef DCC_REC *Irssi__Irc__Dcc; typedef NETSPLIT_REC *Irssi__Irc__Netsplit; typedef NETSPLIT_SERVER_REC *Irssi__Irc__Netsplitserver; +typedef NETSPLIT_CHAN_REC *Irssi__Irc__Netsplitchannel; typedef AUTOIGNORE_REC *Irssi__Irc__Autoignore; typedef NOTIFYLIST_REC *Irssi__Irc__Notifylist; diff --git a/src/perl/irc/typemap b/src/perl/irc/typemap index ec670a57..bfd3954d 100644 --- a/src/perl/irc/typemap +++ b/src/perl/irc/typemap @@ -13,6 +13,8 @@ Irssi::Irc::Netsplitchannel T_PlainObj Irssi::Irc::Autoignore T_PlainObj Irssi::Irc::Notifylist T_PlainObj +Irssi::Windowitem T_IrssiObj + INPUT T_IrssiObj