--- a/gameServer/HWProtoInRoomState.hs Mon Feb 20 20:33:26 2012 +0400
+++ b/gameServer/HWProtoInRoomState.hs Mon Feb 20 21:52:18 2012 +0400
@@ -286,4 +286,6 @@
where
engineMsg cl = toEngineMsg $ B.concat ["b", nick cl, "(team): ", msg, "\x20\x20"]
-handleCmd_inRoom _ = return [ProtocolError "Incorrect command (state: in room)"]
+handleCmd_inRoom (s:_) = return [ProtocolError $ "Incorrect command '" `B.append` s `B.append` "' (state: in room)"]
+
+handleCmd_inRoom [] = return [ProtocolError "Empty command (state: in room)"]