From 34b9f63d19a759ffc4241242f5d27312b21c3bc8 Mon Sep 17 00:00:00 2001 From: dms Date: Sat, 3 Feb 2001 14:10:31 +0000 Subject: [PATCH] debugging info git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk/blootbot@318 c11ca15a-4712-0410-83d8-924469b57eb5 --- src/IRC/IrcHooks.pl | 2 ++ 1 file changed, 2 insertions(+) diff --git a/src/IRC/IrcHooks.pl b/src/IRC/IrcHooks.pl index dd09af7..edfa0aa 100644 --- a/src/IRC/IrcHooks.pl +++ b/src/IRC/IrcHooks.pl @@ -174,6 +174,7 @@ sub on_dcc { $self->whois($nick); $nuh{lc $nick} = "GETTING-NOW"; # trying. $type ||= "???"; + &DEBUG("on_dcc: nuh => GETTING-NOW."); if ($type eq 'SEND') { # GET for us. # incoming DCC SEND. we're receiving a file. @@ -266,6 +267,7 @@ sub on_dcc_open { sub on_dcc_open_chat { my(undef, $nick,$sock) = @_; + &DEBUG("nuh{$nick} => $nuh{$nick}."); if ($nuh{$nick} =~ /^(\S+)(\d+)$/) { my $i = $2; $i++; -- 2.39.5