--- a/gameServer/HWProtoLobbyState.hs	Thu Jan 30 16:08:05 2014 +0400
+++ b/gameServer/HWProtoLobbyState.hs	Fri Jan 31 12:45:51 2014 +0400
@@ -27,7 +27,7 @@
 handleCmd_lobby ["CHAT", msg] = do
     n <- clientNick
     s <- roomOthersChans
-    return [AnswerClients s ["CHAT", n, msg]]
+    return [AnswerClients s ["CHAT", n, msg], RegisterEvent LobbyChatMessage]
 
 handleCmd_lobby ["CREATE_ROOM", rName, roomPassword]
     | illegalName rName = return [Warning $ loc "Illegal room name"]