Case insensitive test for banned nickname
authorunc0rr
Fri, 30 Nov 2012 18:46:25 +0400
changeset 8155 0bccee1d31da
parent 8154 0ea76ea45e6a
child 8156 3ccc61102b58
Case insensitive test for banned nickname
gameServer/Actions.hs
--- a/gameServer/Actions.hs	Fri Nov 30 18:43:43 2012 +0400
+++ b/gameServer/Actions.hs	Fri Nov 30 18:46:25 2012 +0400
@@ -572,7 +572,7 @@
         checkNotExpired testTime (BanByIP _ _ time) = testTime `diffUTCTime` time <= 0
         checkNotExpired testTime (BanByNick _ _ time) = testTime `diffUTCTime` time <= 0
         checkBan ip _ (BanByIP bip _ _) = bip `B.isPrefixOf` ip
-        checkBan _ n (BanByNick bn _ _) = bn == n
+        checkBan _ n (BanByNick bn _ _) = caseInsensitiveCompare bn n
         getBanReason (BanByIP _ msg _) = msg
         getBanReason (BanByNick _ msg _) = msg