diff -r 33c1e9bc68ad -r 8ff92bdc9f98 gameServer/Actions.hs --- 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})