diff options
Diffstat (limited to 'src/perl/irc/Modes.xs')
-rw-r--r-- | src/perl/irc/Modes.xs | 47 |
1 files changed, 47 insertions, 0 deletions
diff --git a/src/perl/irc/Modes.xs b/src/perl/irc/Modes.xs new file mode 100644 index 0000000..a53391b --- /dev/null +++ b/src/perl/irc/Modes.xs @@ -0,0 +1,47 @@ +#define PERL_NO_GET_CONTEXT +#include "module.h" + +MODULE = Irssi::Irc::Modes PACKAGE = Irssi::Irc +PROTOTYPES: ENABLE + +void +modes_join(server, old, mode, channel) + Irssi::Irc::Server server + char *old + char *mode + int channel +PREINIT: + char *ret; +PPCODE: + ret = modes_join(server, old, mode, channel); + XPUSHs(sv_2mortal(new_pv(ret))); + g_free(ret); + +#******************************* +MODULE = Irssi::Irc::Modes PACKAGE = Irssi::Irc::Channel PREFIX = channel_ +#******************************* + +void +ban_get_mask(channel, nick, ban_type) + Irssi::Irc::Channel channel + char *nick + int ban_type +PREINIT: + char *ret; +PPCODE: + ret = ban_get_mask(channel, nick, ban_type); + XPUSHs(sv_2mortal(new_pv(ret))); + g_free(ret); + +Irssi::Irc::Ban +banlist_add(channel, ban, nick, time) + Irssi::Irc::Channel channel + char *ban + char *nick + time_t time + +void +banlist_remove(channel, ban, nick) + Irssi::Irc::Channel channel + char *ban + char *nick |