diff options
| author | Timo Sirainen <cras@irssi.org> | 2000-11-25 23:05:50 +0000 |
|---|---|---|
| committer | cras <cras@dbcabf3a-b0e7-0310-adc4-f8d773084564> | 2000-11-25 23:05:50 +0000 |
| commit | 746bd9b4f0b6b54874068bd0c77b021e0dfaaaac (patch) | |
| tree | 5dc11de573b9baae7977e556a92add4c4f383410 /src/perl/common/Channel.xs | |
| parent | 2e96f68445fc079b142dca7964c831bbe778181b (diff) | |
| download | irssi-746bd9b4f0b6b54874068bd0c77b021e0dfaaaac.zip | |
added functions from fe-windows.h and window-items.h
git-svn-id: http://svn.irssi.org/repos/irssi/trunk@868 dbcabf3a-b0e7-0310-adc4-f8d773084564
Diffstat (limited to 'src/perl/common/Channel.xs')
| -rw-r--r-- | src/perl/common/Channel.xs | 40 |
1 files changed, 20 insertions, 20 deletions
diff --git a/src/perl/common/Channel.xs b/src/perl/common/Channel.xs index 8a2cd824..7ebc927b 100644 --- a/src/perl/common/Channel.xs +++ b/src/perl/common/Channel.xs @@ -41,6 +41,26 @@ channel_find(server, name) Irssi::Server server char *name +void +nicklist_get_same(server, nick) + Irssi::Server server + char *nick +PREINIT: + GSList *list, *tmp; + HV *nickstash; +PPCODE: + list = nicklist_get_same(server, nick); + + nickstash = gv_stashpv("Irssi::Nick", 0); + for (tmp = list; tmp != NULL; tmp = tmp->next->next) { + CHANNEL_REC *channel = tmp->data; + + XPUSHs(sv_2mortal(sv_bless(newRV_noinc(newSViv(GPOINTER_TO_INT(channel))), + irssi_get_stash(channel)))); + XPUSHs(sv_2mortal(sv_bless(newRV_noinc(newSViv(GPOINTER_TO_INT(tmp->next->data))), nickstash))); + } + g_slist_free(list); + #******************************* MODULE = Irssi PACKAGE = Irssi::Channel PREFIX = channel_ #******************************* @@ -107,26 +127,6 @@ PPCODE: } g_slist_free(list); -void -nicklist_get_same(server, nick) - Irssi::Server server - char *nick -PREINIT: - GSList *list, *tmp; - HV *nickstash; -PPCODE: - list = nicklist_get_same(server, nick); - - nickstash = gv_stashpv("Irssi::Nick", 0); - for (tmp = list; tmp != NULL; tmp = tmp->next->next) { - CHANNEL_REC *channel = tmp->data; - - XPUSHs(sv_2mortal(sv_bless(newRV_noinc(newSViv(GPOINTER_TO_INT(channel))), - irssi_get_stash(channel)))); - XPUSHs(sv_2mortal(sv_bless(newRV_noinc(newSViv(GPOINTER_TO_INT(tmp->next->data))), nickstash))); - } - g_slist_free(list); - #******************************* MODULE = Irssi PACKAGE = Irssi::Nick #******************************* |