diff options
Diffstat (limited to 'lib/Multi/IRC.pm')
-rw-r--r-- | lib/Multi/IRC.pm | 13 |
1 files changed, 9 insertions, 4 deletions
diff --git a/lib/Multi/IRC.pm b/lib/Multi/IRC.pm index 690c0ce0..d5f2d015 100644 --- a/lib/Multi/IRC.pm +++ b/lib/Multi/IRC.pm @@ -110,10 +110,15 @@ sub irccmd { # dest, cmd, [nick], [prep] $nick ||= $_[ARG0]; $prep ||= ''; - if($cmd =~ /^info/) { - return $_[KERNEL]->post(circ => privmsg => $dest, - 'Hello, I am HMX-12 Multi v'.$VNDB::VERSION.' made by the great Yorhel!'); - } + return $_[KERNEL]->post(circ => privmsg => $dest, + 'Hello, I am HMX-12 Multi v'.$VNDB::VERSION.' made by the great Yorhel!') + if $cmd =~ /^info/; + return $_[KERNEL]->post(circ => privmsg => $dest, + 'VNDB ~ The Visual Novel Database ~ http://vndb.org/') + if $cmd =~ /^vndb/; + return $_[KERNEL]->post(circ => privmsg => $dest, + $prep.'this is not a warez channel!') + if $cmd =~ /^list/ && $dest eq $_[HEAP]{o}{channel}[0]; return if $cmd !~ /^(?:say|me|cmd|eval) /; |