diff options
author | David Phillips <david@sighup.nz> | 2017-11-24 19:25:06 +1300 |
---|---|---|
committer | David Phillips <david@sighup.nz> | 2017-11-24 19:25:06 +1300 |
commit | 5203987112cc48849f0f796725f1e0e8b1bb2af6 (patch) | |
tree | fad2f3132622a8e4b329e44c621f5aa86b4321c4 | |
parent | 675fb6b676e1f72c6aa337bfa500501e344e3eb0 (diff) | |
download | idalius-5203987112cc48849f0f796725f1e0e8b1bb2af6.tar.xz |
Don't even respond to non-admins
-rwxr-xr-x | idalius.pl | 5 |
1 files changed, 1 insertions, 4 deletions
@@ -141,10 +141,7 @@ sub irc_msg { $irc->yield(privmsg => $nick => "You must identify with services"); return; } - if (!grep {$_ eq $who} @{$config{admins}}) { - $irc->yield(privmsg => $nick => "I am bot, go away"); - return; - } + return unless grep {$_ eq $who} @{$config{admins}}; # FIXME this needs tidying. Some of this can be factored out, surely. if ($what =~ /^nick\s/) { my ($newnick) = $what =~ /^nick\s+(\S+)$/; |