summaryrefslogtreecommitdiff
path: root/src/perl/irc
diff options
context:
space:
mode:
authorTimo Sirainen <cras@irssi.org>2001-12-10 23:32:46 +0000
committercras <cras@dbcabf3a-b0e7-0310-adc4-f8d773084564>2001-12-10 23:32:46 +0000
commit020861c698967b156c52473a91b2f61d2e965ee1 (patch)
tree6d91a40a66b41be6a9a4e6bcf8fb2df6fe4f94dd /src/perl/irc
parent3b8622f1aaa83f082286af6e4efbd648042fcfcb (diff)
downloadirssi-020861c698967b156c52473a91b2f61d2e965ee1.zip
Netsplit saved the NICK_REC, but didn't save the dynamically allocated strings
which were part of it. Removed it now and replaced it with saving only op/halfop/voice status. Might have caused some crashes? (hopefully did :) git-svn-id: http://svn.irssi.org/repos/irssi/trunk@2234 dbcabf3a-b0e7-0310-adc4-f8d773084564
Diffstat (limited to 'src/perl/irc')
-rw-r--r--src/perl/irc/Irc.xs4
-rw-r--r--src/perl/irc/Netsplit.xs2
2 files changed, 4 insertions, 2 deletions
diff --git a/src/perl/irc/Irc.xs b/src/perl/irc/Irc.xs
index 554065bc..b0588cec 100644
--- a/src/perl/irc/Irc.xs
+++ b/src/perl/irc/Irc.xs
@@ -119,7 +119,9 @@ static void perl_netsplit_server_fill_hash(HV *hv, NETSPLIT_SERVER_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, iobject_bless(&rec->nick), 0);
+ hv_store(hv, "op", 2, newSViv(rec->op), 0);
+ hv_store(hv, "halfop", 6, newSViv(rec->halfop), 0);
+ hv_store(hv, "voice", 5, newSViv(rec->voice), 0);
}
static void perl_notifylist_fill_hash(HV *hv, NOTIFYLIST_REC *notify)
diff --git a/src/perl/irc/Netsplit.xs b/src/perl/irc/Netsplit.xs
index e4ef85e4..b0b1e523 100644
--- a/src/perl/irc/Netsplit.xs
+++ b/src/perl/irc/Netsplit.xs
@@ -9,7 +9,7 @@ netsplit_find(server, nick, address)
char *nick
char *address
-Irssi::Irc::Nick
+Irssi::Irc::Netsplitchannel
netsplit_find_channel(server, nick, address, channel)
Irssi::Irc::Server server
char *nick