gameServer/Actions.hs
changeset 4917 8ff92bdc9f98
parent 4914 5c33bb53c1e5
child 4918 c6d3aec73f93
--- a/gameServer/Actions.hs	Fri Feb 04 20:41:46 2011 +0100
+++ b/gameServer/Actions.hs	Sat Feb 05 11:05:16 2011 +0300
@@ -262,7 +262,7 @@
     ri <- clientRoomA
     roomPlayers <- roomClientsS ri
     roomClIDs <- io $ roomClientsIndicesM rnc ri
-    processAction $ AnswerClients (map sendChan roomPlayers) ("NOT_READY" : map nick roomPlayers)
+    processAction $ AnswerClients (map sendChan roomPlayers) ("CLIENT_FLAGS" : "-r" : map nick roomPlayers)
     io $ mapM_ (modifyClient rnc (\cl -> cl{isReady = False})) roomClIDs
     processAction $ ModifyRoom (\r -> r{readyPlayers = 0})