gameServer/hedgewars-server.hs
changeset 1839 5dd4cb7fd7e5
parent 1833 e901ec5644b4
child 1927 e2031906a347
--- a/gameServer/hedgewars-server.hs	Tue Feb 24 19:39:10 2009 +0000
+++ b/gameServer/hedgewars-server.hs	Tue Feb 24 19:39:49 2009 +0000
@@ -50,7 +50,7 @@
 	stats <- atomically $ newTMVar (StatisticsInfo 0 0)
 	dbQueriesChan <- newChan
 	coreChan <- newChan
-	serverInfo <- getOpts $ newServerInfo stats dbQueriesChan
+	serverInfo <- getOpts $ newServerInfo stats coreChan dbQueriesChan
 	
 	bracket
 		(Network.listenOn $ Network.PortNumber $ listenPort serverInfo)