--- a/gameServer/HWProtoNEState.hs Wed May 16 18:22:28 2018 +0200
+++ b/gameServer/HWProtoNEState.hs Wed Jul 31 23:14:27 2019 +0200
@@ -65,6 +65,7 @@
if clientProto cl < 48 && passwd == webPassword cl then
return $ JoinLobby : [AnswerClients [sendChan cl] ["ADMIN_ACCESS"] | isAdministrator cl]
else
+ -- String is parsed by frontend, do not localize!
return [ByeClient "Authentication failed"]
@@ -81,6 +82,7 @@
, JoinLobby
]
else
+ -- String is parsed by frontend, do not localize!
return [ByeClient "Authentication failed"]
where
h = B.pack . showDigest . sha1 . BL.fromChunks
@@ -99,4 +101,6 @@
parsedProto = readInt_ protoNum
#endif
-handleCmd_NotEntered _ = return [ProtocolError "Incorrect command (state: not entered)"]
+handleCmd_NotEntered (s:_) = return [ProtocolError $ "Incorrect command '" `B.append` s `B.append` "' (state: not entered)"]
+
+handleCmd_NotEntered [] = return [ProtocolError "Empty command (state: not entered)"]
\ No newline at end of file