--- deliantra/server/ext/schmorp-irc.ext	2007/01/24 16:29:10	1.4
+++ deliantra/server/ext/schmorp-irc.ext	2007/02/09 23:32:13	1.5
@@ -93,6 +93,8 @@
 #         1;
 #      },
       disconnect => sub {
+         my ($con, $reason) = @_;
+         warn "CFBOT: disconnect: $reason\n";
          undef $CON;
          0;
       }