- add more debug info to on_message()

diff --git a/docbot.pl b/docbot.pl
index 3b33f396d5cd9cd00d16f61a57c8364b8aa0d79b..eaa2b296b4072542758a28c1931f2aa854bb4d7b 100755 (executable)
--- a/docbot.pl
+++ b/docbot.pl
@@ -1820,10 +1820,10 @@ sub on_message {
     my $channel = $where->[0];
     my $replyto = $channel;
     my $full_msg = $msg;
-    print_msg("on_message($msg)", DEBUG);
 
     my $irc = $sender->get_heap();
     my $session = find_irc_session($irc);
+    print_msg("on_message($msg), session: $session", DEBUG);
 
 
     # recognize valid command (both admin and unprivileged)