changeset 7945 | 4006d77e1a28 |
parent 7926 | 550083f61a0e |
child 7947 | 0cf5277fef1a |
--- a/gameServer/Actions.hs Sat Nov 03 19:16:41 2012 +0100 +++ b/gameServer/Actions.hs Sat Nov 03 23:28:42 2012 +0400 @@ -299,7 +299,7 @@ chans <- liftM (map sendChan) $! sameProtoClientsS proto mapM_ processAction [ - AnswerClients chans ("ROOM" : "ADD" : roomInfo n rm) + AnswerClients chans ("ROOM" : "ADD" : roomInfo n rm{playersIn = 1}) ]