author | unc0rr |
Sat, 22 Jan 2011 22:39:35 +0300 | |
changeset 4868 | 652139f230c7 |
parent 4866 | 64572716e097 (diff) |
parent 4867 | e604ee83e34f (current diff) |
child 4869 | 7a720b5d2247 |
--- a/gameServer/Utils.hs Sat Jan 22 19:40:57 2011 +0100 +++ b/gameServer/Utils.hs Sat Jan 22 22:39:35 2011 +0300 @@ -91,7 +91,7 @@ t : replaceTeam team teams illegalName :: String -> Bool -illegalName = all isSpace +illegalName s = null s || all isSpace s || isSpace (head s) || isSpace (last s) protoNumber2ver :: Word16 -> String protoNumber2ver 17 = "0.9.7-dev"