diff -r 870305c40b81 -r 5721af6d73f0 netserver/hedgewars-server.hs --- a/netserver/hedgewars-server.hs Mon Nov 17 18:24:34 2008 +0000 +++ b/netserver/hedgewars-server.hs Mon Nov 17 18:27:47 2008 +0000 @@ -85,7 +85,7 @@ do forM_ answer (\str -> hPutStrLn ch str) hPutStrLn ch "" - --hFlush ch + hFlush ch if head answer == "BYE" then return [ch] else return [] let outHandles = concat clHandles'