| 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)