From 20f05619dddb0d88d5985f03f535705c26127287 Mon Sep 17 00:00:00 2001
From: timriker <timriker@c11ca15a-4712-0410-83d8-924469b57eb5>
Date: Wed, 23 Feb 2005 05:54:40 +0000
Subject: [PATCH] unique?

git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk/blootbot@1171 c11ca15a-4712-0410-83d8-924469b57eb5
---
 src/UserExtra.pl | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/src/UserExtra.pl b/src/UserExtra.pl
index 821636c..11d6de2 100644
--- a/src/UserExtra.pl
+++ b/src/UserExtra.pl
@@ -75,12 +75,14 @@ sub chaninfo {
 	### unique user count.
 	my @nicks;
 	foreach $chan (keys %channels) {
-	    foreach (keys %{ $channels{$chan}{''} }) {
-		next if (grep /^\Q$_\E$/, @nicks);
+	    my $nick = '';
+	    foreach $nick (keys %{ $channels{$chan}{''} }) {
+		next if (grep /^\Q$nick\E$/, @nicks);
 		$uucount++;
-		push(@nicks, $_);
+		push(@nicks, $nick);
 	    }
 	}
+	&::DEBUG(join ":", @nicks);
 
 	if (scalar @nicks != $uucount) {
 	    &DEBUG("nicks != uucount...");
-- 
2.39.2