--- deliantra/server/ext/irc.ext	2007/11/07 13:35:32	1.8
+++ deliantra/server/ext/irc.ext	2007/11/14 08:09:46	1.9
@@ -107,11 +107,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;
+};