irssi/src/perl/common/Ignore.xs
2001-12-15 20:37:50 +00:00

50 lines
931 B
Text

#include "module.h"
MODULE = Irssi::Ignore PACKAGE = Irssi
PROTOTYPES: ENABLE
void
ignores()
PREINIT:
GSList *tmp;
PPCODE:
for (tmp = ignores; tmp != NULL; tmp = tmp->next) {
XPUSHs(sv_2mortal(plain_bless(tmp->data, "Irssi::Ignore")));
}
int
ignore_check(nick, host, channel, text, level)
char *nick
char *host
char *channel
char *text
int level
CODE:
RETVAL = ignore_check(NULL, nick, host, channel, text, level);
OUTPUT:
RETVAL
#*******************************
MODULE = Irssi::Ignore PACKAGE = Irssi::Server
#*******************************
int
ignore_check(server, nick, host, channel, text, level)
Irssi::Server server
char *nick
char *host
char *channel
char *text
int level
#*******************************
MODULE = Irssi::Ignore PACKAGE = Irssi::Ignore PREFIX = ignore_
#*******************************
void
ignore_add_rec(rec)
Irssi::Ignore rec
void
ignore_update_rec(rec)
Irssi::Ignore rec