--- deliantra/server/ext/irc.ext	2007/11/07 13:35:32	1.8
+++ deliantra/server/ext/irc.ext	2008/05/02 16:09:36	1.11
@@ -89,9 +89,10 @@
          if ($tmsg =~ /^\!/) {
             handle_fcmd ($name, $nick, $tmsg);
          } elsif ($tmsg =~ m/\S/) {
-            $_->ns->send_msg ($ext::chat::CHAT_CHANNEL,
+            $_->ns->send_msg ($cf::CHAT_CHANNEL,
                "$name/".$nick." chats: $tmsg", cf::NDI_BLUE | cf::NDI_DEF
             ) for grep { $_->ob->{ext_ignore_shout}{$name} < $NOW && $_->listening >= 10 } cf::player::list;
+            cf::LOG cf::llevDebug, sprintf "QBERT [%s] %s\n", "$name/$nick", $tmsg;
          }
          1;
       },
@@ -107,11 +108,7 @@
    );
 }
 
-Event->timer (
-   reentrant => 0,
-   after     => 1,
-   interval  => 30,
-   data      => cf::WF_AUTOCANCEL,
-   cb        => Coro::unblock_sub { check_connection },
-);
+our $RECONNECT = cf::periodic 30, Coro::unblock_sub {
+   check_connection;
+};