Mercurial Mercurial > hedgewars / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
gameServer/Actions.hs
branchserver_refactor
changeset 4585 6e747aef012f
parent 4579 4e61c2a42121
child 4587 adf64662b6a8 
--- a/gameServer/Actions.hs	Mon Jan 24 21:33:03 2011 +0300
+++ b/gameServer/Actions.hs	Tue Jan 25 22:13:34 2011 +0300
@@ -428,7 +428,7 @@
     liftIO $ do
         ci <- addClient rnc client
         t <- forkIO $ clientRecvLoop (clientSocket client) (coreChan si) ci
-        forkIO $ clientSendLoop (clientSocket client) t (sendChan client) ci
+        forkIO $ clientSendLoop (clientSocket client) t (coreChan si) (sendChan client) ci
 
         infoM "Clients" (show ci ++ ": New client. Time: " ++ show (connectTime client))
hedgewars