diff -r 6e747aef012f -r adf64662b6a8 gameServer/Actions.hs --- a/gameServer/Actions.hs Tue Jan 25 22:13:34 2011 +0300 +++ b/gameServer/Actions.hs Tue Jan 25 22:23:08 2011 +0300 @@ -188,6 +188,7 @@ processAction $ AnswerClients chans ["JOINED", clNick] + processAction (MoveToLobby msg) = do (Just ci) <- gets clientIndex ri <- clientRoomA