summaryrefslogtreecommitdiff
path: root/src/perl/irc
diff options
context:
space:
mode:
Diffstat (limited to 'src/perl/irc')
-rw-r--r--src/perl/irc/Ignore.xs74
-rw-r--r--src/perl/irc/Irc.xs1
-rw-r--r--src/perl/irc/module.h2
-rw-r--r--src/perl/irc/typemap1
4 files changed, 0 insertions, 78 deletions
diff --git a/src/perl/irc/Ignore.xs b/src/perl/irc/Ignore.xs
deleted file mode 100644
index c19eb5c8..00000000
--- a/src/perl/irc/Ignore.xs
+++ /dev/null
@@ -1,74 +0,0 @@
-MODULE = Irssi::Irc PACKAGE = Irssi::Irc
-
-void
-ignores()
-PREINIT:
- GSList *tmp;
- HV *stash;
-PPCODE:
- stash = gv_stashpv("Irssi::Irc::Ignore", 0);
- for (tmp = servers; tmp != NULL; tmp = tmp->next) {
- XPUSHs(sv_2mortal(sv_bless(newRV_noinc(newSViv(GPOINTER_TO_INT(tmp->data))), stash)));
- }
-
-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::Irc PACKAGE = Irssi::Irc::Server
-#*******************************
-
-int
-ignore_check(server, nick, host, channel, text, level)
- Irssi::Irc::Server server
- char *nick
- char *host
- char *channel
- char *text
- int level
-
-#*******************************
-MODULE = Irssi::Irc PACKAGE = Irssi::Irc::Ignore PREFIX = ignore_
-#*******************************
-
-void
-values(ignore)
- Irssi::Irc::Ignore ignore
-PREINIT:
- HV *hv;
- AV *av;
- char **tmp;
-PPCODE:
- hv = newHV();
- hv_store(hv, "mask", 4, new_pv(ignore->mask), 0);
- hv_store(hv, "servertag", 9, new_pv(ignore->servertag), 0);
- av = newAV();
- for (tmp = ignore->channels; *tmp != NULL; tmp++) {
- av_push(av, new_pv(*tmp));
- }
- hv_store(hv, "channels", 8, newRV_noinc((SV*)av), 0);
- hv_store(hv, "pattern", 7, new_pv(ignore->pattern), 0);
-
- hv_store(hv, "level", 5, newSViv(ignore->level), 0);
- hv_store(hv, "except_level", 12, newSViv(ignore->except_level), 0);
-
- hv_store(hv, "regexp", 6, newSViv(ignore->regexp), 0);
- hv_store(hv, "fullword", 8, newSViv(ignore->fullword), 0);
- XPUSHs(sv_2mortal(newRV_noinc((SV*)hv)));
-
-void
-ignore_add_rec(rec)
- Irssi::Irc::Ignore rec
-
-void
-ignore_update_rec(rec)
- Irssi::Irc::Ignore rec
diff --git a/src/perl/irc/Irc.xs b/src/perl/irc/Irc.xs
index 0d00e9ce..f70e9a22 100644
--- a/src/perl/irc/Irc.xs
+++ b/src/perl/irc/Irc.xs
@@ -5,7 +5,6 @@ MODULE = Irssi::Irc PACKAGE = Irssi::Irc
PROTOTYPES: ENABLE
INCLUDE: Bans.xs
-INCLUDE: Ignore.xs
INCLUDE: IrcServer.xs
INCLUDE: IrcChannel.xs
INCLUDE: IrcQuery.xs
diff --git a/src/perl/irc/module.h b/src/perl/irc/module.h
index 2e0e7823..2c2f24c7 100644
--- a/src/perl/irc/module.h
+++ b/src/perl/irc/module.h
@@ -8,7 +8,6 @@
#include "modes.h"
#include "mode-lists.h"
#include "netsplit.h"
-#include "ignore.h"
#include "dcc/dcc.h"
#include "flood/autoignore.h"
@@ -25,4 +24,3 @@ typedef NETSPLIT_REC *Irssi__Irc__Netsplit;
typedef NETSPLIT_SERVER_REC *Irssi__Irc__Netsplitserver;
typedef AUTOIGNORE_REC *Irssi__Irc__Autoignore;
typedef NOTIFYLIST_REC *Irssi__Irc__Notifylist;
-typedef IGNORE_REC *Irssi__Irc__Ignore;
diff --git a/src/perl/irc/typemap b/src/perl/irc/typemap
index 58a8ce95..88035c57 100644
--- a/src/perl/irc/typemap
+++ b/src/perl/irc/typemap
@@ -9,6 +9,5 @@ Irssi::Irc::Netsplit T_PTROBJ
Irssi::Irc::Netsplitserver T_PTROBJ
Irssi::Irc::Autoignore T_PTROBJ
Irssi::Irc::Notifylist T_PTROBJ
-Irssi::Irc::Ignore T_PTROBJ
Irssi::Nick T_PTROBJ