diff -r bd540ba66599 -r 4771fed9272e gameServer/hedgewars-server.hs
--- a/gameServer/hedgewars-server.hs	Sat Mar 05 22:39:26 2011 +0300
+++ b/gameServer/hedgewars-server.hs	Sun Mar 06 21:54:37 2011 +0300
@@ -25,7 +25,7 @@
         (setLevel INFO)
 
 
-server :: ServerInfo c -> IO ()
+server :: ServerInfo -> IO ()
 server si = do
     proto <- getProtocolNumber "tcp"
     E.bracket