From: dms <dms@c11ca15a-4712-0410-83d8-924469b57eb5> Date: Sat, 3 Feb 2001 14:10:31 +0000 (+0000) Subject: debugging info X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=34b9f63d19a759ffc4241242f5d27312b21c3bc8;p=infobot.git debugging info git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk/blootbot@318 c11ca15a-4712-0410-83d8-924469b57eb5 --- 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++;