diff -r 3331b30e4ef1 -r 88fde28bbda6 gameServer/HWProtoLobbyState.hs --- a/gameServer/HWProtoLobbyState.hs Sun Oct 21 01:28:33 2012 +0400 +++ b/gameServer/HWProtoLobbyState.hs Sat Nov 03 00:34:35 2012 +0400 @@ -51,8 +51,10 @@ [Warning "Room exists"] else [ - AddRoom rName roomPassword, - AnswerClients [sendChan cl] ["CLIENT_FLAGS", "-r", nick cl] + AddRoom rName roomPassword + , AnswerClients [sendChan cl] ["CLIENT_FLAGS", "+hr", nick cl] + , ModifyClient (\c -> c{isMaster = True, isReady = True}) + , ModifyRoom (\r -> r{readyPlayers = 1}) ]