gameServer/NetRoutines.hs
changeset 5209 f7a610e2ef5f
parent 4987 cf9470964dba
child 7757 c20e6c80e249
--- a/gameServer/NetRoutines.hs	Thu May 12 23:29:31 2011 +0200
+++ b/gameServer/NetRoutines.hs	Sun May 15 18:10:01 2011 +0400
@@ -14,8 +14,6 @@
 
 acceptLoop :: Socket -> Chan CoreMessage -> IO ()
 acceptLoop servSock chan = forever $
-    Exception.handle
-        (\(_ :: Exception.IOException) -> putStrLn "exception on connect") $
         do
         (sock, sockAddr) <- Network.Socket.accept servSock