changeset 1403 | b8c921ed0f13 |
parent 1398 | 29eedf717d0f |
child 1461 | 87e5a6c3882c |
--- a/netserver/hedgewars-server.hs Wed Oct 22 21:41:00 2008 +0000 +++ b/netserver/hedgewars-server.hs Thu Oct 23 15:12:38 2008 +0000 @@ -25,7 +25,7 @@ hFlush cHandle cChan <- atomically newTChan forkIO $ clientLoop cHandle cChan - atomically $ writeTChan acceptChan (ClientInfo cChan cHandle "" 0 "" False False) + atomically $ writeTChan acceptChan (ClientInfo cChan cHandle "" 0 "" False False False) acceptLoop servSock acceptChan