# HG changeset patch
# User unc0rr
# Date 1223586042 0
# Node ID 430d210d54aed46440a3355ce05e999e310d3a50
# Parent  8a11157c6c811f2e60505bd7077efa4b48e33567
Flush CONNECTED message, so client hasn't to wait for it on connect

diff -r 8a11157c6c81 -r 430d210d54ae netserver/newhwserv.hs
--- a/netserver/newhwserv.hs	Thu Oct 09 20:36:53 2008 +0000
+++ b/netserver/newhwserv.hs	Thu Oct 09 21:00:42 2008 +0000
@@ -19,6 +19,7 @@
 	forkIO $ clientLoop cHandle cChan
 	atomically $ writeTChan acceptChan (ClientInfo cChan cHandle "" 0 "" False)
 	hPutStrLn cHandle "CONNECTED\n"
+	hFlush cHandle
 	acceptLoop servSock acceptChan