gameServer/Utils.hs
changeset 2150 45b695f3a7b9
parent 2113 89d0fa6734af
child 2304 a6e733ad0366
--- a/gameServer/Utils.hs	Sat Jun 06 12:42:35 2009 +0000
+++ b/gameServer/Utils.hs	Sun Jun 07 07:42:40 2009 +0000
@@ -57,6 +57,9 @@
 		else
 			t : replaceTeam team teams
 
+illegalName :: String -> Bool
+illegalName str = all isSpace str
+
 protoNumber2ver :: Word16 -> String
 protoNumber2ver 17 = "0.9.7-dev"
 protoNumber2ver 19 = "0.9.7"