changeset 1879 | bb114339eb4e |
parent 1847 | 2178c0fc838c |
child 2150 | 45b695f3a7b9 |
--- a/gameServer/HWProtoNEState.hs Mon Mar 09 20:23:04 2009 +0000 +++ b/gameServer/HWProtoNEState.hs Mon Mar 09 20:47:17 2009 +0000 @@ -41,6 +41,7 @@ parsedProto = fromMaybe 0 (maybeRead protoNum :: Maybe Word16) checkPassword = if (not . null) (nick client) then [CheckRegistered] else [] + handleCmd_NotEntered clID clients _ ["PASSWORD", passwd] = if passwd == webPassword client then [ModifyClient (\cl -> cl{logonPassed = True}),