Don't ban if $a:account matches account

This commit is contained in:
Pragmatic Software 2014-03-04 10:50:12 +00:00
parent c1f87bf177
commit 2a4c1bafd1
2 changed files with 6 additions and 1 deletions

View File

@ -623,6 +623,11 @@ sub check_bans {
next;
}
if(defined $nickserv_account and $baninfo->{type} eq '+q' and $mask =~ /^\$a:(.*)/ and lc $1 eq lc $nickserv_account) {
$self->{pbot}->logger->log("anti-flood: [check-bans] Hostmask ($mask) matches account ($nickserv_account), disregarding\n");
next;
}
if(not defined $bans) {
$bans = [];
}

View File

@ -13,7 +13,7 @@ use warnings;
# These are set automatically by the build/commit script
use constant {
BUILD_NAME => "PBot",
BUILD_REVISION => 500,
BUILD_REVISION => 501,
BUILD_DATE => "2014-03-04",
};