--- 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