--- a/gameServer/HWProtoNEState.hs Thu Jan 20 01:49:20 2011 +0100
+++ b/gameServer/HWProtoNEState.hs Thu Jan 20 21:32:39 2011 +0300
@@ -13,7 +13,7 @@
handleCmd_NotEntered clID clients _ ["NICK", newNick]
| not . null $ nick client = [ProtocolError "Nickname already chosen"]
- | haveSameNick = [AnswerThisClient ["WARNING", "Nickname already in use"], ByeClient ""]
+ | haveSameNick = [AnswerThisClient ["WARNING", "Nickname already in use"], ByeClient "Nickname already in use"]
| illegalName newNick = [ByeClient "Illegal nickname"]
| otherwise =
ModifyClient (\c -> c{nick = newNick}) :