gameServer/HWProtoNEState.hs
changeset 3435 4e4f88a7bdf2
parent 2868 ccb20ecd3503
child 3458 11cd56019f00
--- a/gameServer/HWProtoNEState.hs	Thu May 06 15:26:14 2010 +0000
+++ b/gameServer/HWProtoNEState.hs	Thu May 06 17:39:08 2010 +0000
@@ -11,6 +11,7 @@
 
 handleCmd_NotEntered :: CmdHandler
 
+{-
 handleCmd_NotEntered clID clients _ ["NICK", newNick]
     | not . null $ nick client = [ProtocolError "Nickname already chosen"]
     | haveSameNick = [AnswerThisClient ["WARNING", "Nickname already in use"], ByeClient ""]
@@ -49,6 +50,6 @@
 
 handleCmd_NotEntered clID clients _ ["DUMP"] =
     if isAdministrator (clients IntMap.! clID) then [Dump] else []
-
+-}
 
-handleCmd_NotEntered clID _ _ _ = [ProtocolError "Incorrect command (state: not entered)"]
+handleCmd_NotEntered _ = return [ProtocolError "Incorrect command (state: not entered)"]