equal
deleted
inserted
replaced
428 p <- client's clientProto |
428 p <- client's clientProto |
429 checker <- client's isChecker |
429 checker <- client's isChecker |
430 uid <- client's clUID |
430 uid <- client's clUID |
431 -- allow multiple checker logins |
431 -- allow multiple checker logins |
432 haveSameNick <- liftM (not . null . tail . filter (\c -> (not $ isChecker c) && caseInsensitiveCompare (nick c) n)) allClientsS |
432 haveSameNick <- liftM (not . null . tail . filter (\c -> (not $ isChecker c) && caseInsensitiveCompare (nick c) n)) allClientsS |
433 if haveSameNick && (not checker) then |
433 if (not checker) && haveSameNick then |
434 if p < 38 then |
434 if p < 38 then |
435 processAction $ ByeClient $ loc "Nickname is already in use" |
435 processAction $ ByeClient $ loc "Nickname is already in use" |
436 else |
436 else |
437 processAction $ NoticeMessage NickAlreadyInUse |
437 processAction $ NoticeMessage NickAlreadyInUse |
438 else |
438 else |