gameServer/hedgewars-server.hs
changeset 1833 e901ec5644b4
parent 1804 4e78ad846fb6
child 1839 5dd4cb7fd7e5
--- a/gameServer/hedgewars-server.hs	Mon Feb 23 20:15:02 2009 +0000
+++ b/gameServer/hedgewars-server.hs	Mon Feb 23 20:25:07 2009 +0000
@@ -48,9 +48,9 @@
 	setupLoggers
 
 	stats <- atomically $ newTMVar (StatisticsInfo 0 0)
-	--dbQueriesChan <- atomically newTChan
+	dbQueriesChan <- newChan
 	coreChan <- newChan
-	serverInfo <- getOpts $ newServerInfo stats -- dbQueriesChan
+	serverInfo <- getOpts $ newServerInfo stats dbQueriesChan
 	
 	bracket
 		(Network.listenOn $ Network.PortNumber $ listenPort serverInfo)