--- deliantra/server/ext/tcp.ext	2006/12/22 06:02:29	1.4
+++ deliantra/server/ext/tcp.ext	2006/12/23 03:38:43	1.5
@@ -10,6 +10,7 @@
 our $LISTEN = new IO::Socket::INET
    LocalPort => cf::settings->csport,
    Listen    => 1,
+   Blocking  => 0, # bugfix workaround for Event calling handler twice :(
    ReuseAddr => 1;
 
 if (!$LISTEN) {