X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=src%2FCommandStubs.pl;h=1a55669aef5b19ad323f1480aa82a45997506e3f;hb=c68ac9b2d4b88535c1a2cfa695f6c4f683f0373c;hp=c83d46a6cc1746c4757dd75e4f3b37bddf146a40;hpb=fdd115a93a558990e0d5ae007c0c954849f205e6;p=infobot.git diff --git a/src/CommandStubs.pl b/src/CommandStubs.pl index c83d46a..1a55669 100644 --- a/src/CommandStubs.pl +++ b/src/CommandStubs.pl @@ -280,6 +280,11 @@ sub Modules { $itc =~ s/([^\w\s])/\\$1/g; my $z = join '|', split ' ', $itc; + if ($msgType eq "privmsg" and $message =~ / ($mask{chan})$/) { + &DEBUG("ircTC: privmsg detected; chan = $1"); + $chan = $1; + } + if ($message =~ /^_stats(\s+(\S+))$/i) { &textstats_main($2); return; @@ -797,7 +802,7 @@ sub do_verstats { return; } - &msg($who, "Sending CTCP VERSION to #chan..."); + &msg($who, "Sending CTCP VERSION to #$chan..."); $conn->ctcp("VERSION", $chan); $cache{verstats}{chan} = $chan; $cache{verstats}{who} = $who;