summaryrefslogtreecommitdiffstats
path: root/modules/classes.pl
diff options
context:
space:
mode:
authorLibravatarWilliam Heimbigner <william.heimbigner@gmail.com>2012-05-09 16:06:14 +0000
committerLibravatarWilliam Heimbigner <william.heimbigner@gmail.com>2012-05-09 16:06:14 +0000
commit14eb8a77479507875fe77640dd044d1a462e568a (patch)
tree4ac100311b2ddb7ce2d3f047318b5b0327ae9be0 /modules/classes.pl
parent62aeddf74f00e7b5418779e8fc1e92cf74b76a6b (diff)
I got tired of checking things in individually so here's one big massive checkin
Diffstat (limited to 'modules/classes.pl')
-rw-r--r--modules/classes.pl5
1 files changed, 3 insertions, 2 deletions
diff --git a/modules/classes.pl b/modules/classes.pl
index 6896ce7..d747815 100644
--- a/modules/classes.pl
+++ b/modules/classes.pl
@@ -78,6 +78,7 @@ sub dnsbl
# return unless index($event->{host}, '/') == -1;
# hopefully getting rid of this won't cause shit to assplode
# but I'm getting rid of it so it can detect cgi:irc shit
+ return 0;
if (defined $rev) {
print "Querying $rev$chk->{content}\n" if $::debugx{dnsbl};
my $iaddr = gethostbyname( "$rev$chk->{content}" );
@@ -151,7 +152,7 @@ sub splitflood {
$text=$event->{args}->[0];
}
return unless defined($text);
- return unless length($text) >= 10;
+# return unless length($text) >= 10;
if (defined($bs{$id}{$text}) && (time <= $bs{$id}{$text} + 600)) {
return 1;
}
@@ -181,7 +182,7 @@ sub advsplitflood {
$text=$event->{args}->[0];
}
return unless defined($text);
- $text=~s/^\d+(.*)\d+$/$1/;
+ $text=~s/^\d*(.*)\d*$/$1/;
return unless length($text) >= 10;
if (defined($bs{$id}{$text}) && (time <= $bs{$id}{$text} + 600)) {
return 1;