irssi/src/perl/common/Query.xs
Timo Sirainen 08b869e8ee ischannel()'s parameter updated from char -> char* as done in C API.
[irc_]query_create()'s SERVER_REC* parameter -> char *server_tag


git-svn-id: http://svn.irssi.org/repos/irssi/trunk@1044 dbcabf3a-b0e7-0310-adc4-f8d773084564
2001-01-01 17:34:03 +00:00

53 lines
976 B
Text

MODULE = Irssi PACKAGE = Irssi
void
queries()
PREINIT:
GSList *tmp;
PPCODE:
for (tmp = queries; tmp != NULL; tmp = tmp->next) {
QUERY_REC *rec = tmp->data;
XPUSHs(sv_2mortal(irssi_bless(rec)));
}
#*******************************
MODULE = Irssi PACKAGE = Irssi::Server
#*******************************
void
queries(server)
Irssi::Server server
PREINIT:
GSList *tmp;
PPCODE:
for (tmp = server->queries; tmp != NULL; tmp = tmp->next) {
QUERY_REC *rec = tmp->data;
XPUSHs(sv_2mortal(irssi_bless(rec)));
}
Irssi::Query
query_create(chat_type, server_tag, nick, automatic)
int chat_type
char *server_tag
char *nick
int automatic
Irssi::Query
query_find(server, nick)
Irssi::Server server
char *nick
#*******************************
MODULE = Irssi PACKAGE = Irssi::Query PREFIX = query_
#*******************************
void
query_destroy(query)
Irssi::Query query
void
query_change_server(query, server)
Irssi::Query query
Irssi::Server server