aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorTom Feist <shabble@metavore.org>2011-04-21 22:41:57 +0000
committerTom Feist <shabble@metavore.org>2011-04-21 22:41:57 +0000
commit288758fd2ae991b6269500030af9ed522d66084e (patch)
tree49bf546102785948342cf4c5d65872b679f960d8
parent* quit-notify/README.pod: added documentation for notifyquit, and generated (diff)
downloadirssi-scripts-288758fd2ae991b6269500030af9ed522d66084e.tar.gz
irssi-scripts-288758fd2ae991b6269500030af9ed522d66084e.zip
notifyquit: removed debug prints.
Diffstat (limited to '')
-rw-r--r--quit-notify/notifyquit.pl5
1 files changed, 0 insertions, 5 deletions
diff --git a/quit-notify/notifyquit.pl b/quit-notify/notifyquit.pl
index a8d7f3f..a37e258 100644
--- a/quit-notify/notifyquit.pl
+++ b/quit-notify/notifyquit.pl
@@ -171,13 +171,10 @@ sub extract_nick {
sub check_nick_exemptions {
my ($nick) = @_;
foreach my $except (@match_exceptions) {
- print "Testing nick $nick against $except";
if ($nick =~ $except) {
- print "FAiled match $except";
return 0; # fail
}
}
- print "match ok";
return 1;
}
@@ -285,7 +282,6 @@ sub sig_setup_changed {
foreach my $except (@except_list) {
- print "Exception regex str: $except";
$except =~ s|^/||;
$except =~ s|/$||;
@@ -300,7 +296,6 @@ sub sig_setup_changed {
if ($@ or not defined $regex) {
print "Regex failed to parse: \"$except\": $@";
} else {
- print "Adding match exception: $regex";
push @match_exceptions, $regex;
}
}