From: dms <dms@c11ca15a-4712-0410-83d8-924469b57eb5>
Date: Mon, 5 Feb 2001 16:04:05 +0000 (+0000)
Subject: ok, that failed. lets now set $chan aswell
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=3ab6148c6c10311095d9db6dfd698489801cf3d8;p=infobot.git

ok, that failed. lets now set $chan aswell


git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk/blootbot@346 c11ca15a-4712-0410-83d8-924469b57eb5
---

diff --git a/src/CommandStubs.pl b/src/CommandStubs.pl
index c9a19f0..9041415 100644
--- a/src/CommandStubs.pl
+++ b/src/CommandStubs.pl
@@ -674,14 +674,14 @@ sub do_verstats {
 
     &msg($who, "Sending CTCP VERSION...");
     $conn->ctcp("VERSION", $chan);
-#    $cache{verstats}	= $chan;
+    $cache{verstats}	= $chan;
 
     $conn->schedule(60, sub {
 	my $vtotal	= 0;
-#	my $c		= lc $cache{verstats};
-	my $c		= lc $chan;
+	my $c		= lc $cache{verstats};
 	my $total	= keys %{ $channels{$c}{''} };
-#	delete $cache{verstats};
+	delete $cache{verstats};
+	$chan		= $c;
 
 	foreach (keys %ver) {
 	    $vtotal	+= scalar keys %{ $ver{$_} };