gameServer/Utils.hs
changeset 4972 2f9c8a12edce
parent 4936 d65d438acd23
child 4975 31da8979e5b1
--- a/gameServer/Utils.hs	Sun Feb 27 18:03:33 2011 -0500
+++ b/gameServer/Utils.hs	Sun Feb 27 18:55:34 2011 -0500
@@ -39,7 +39,7 @@
         check Nothing = (False, False)
         check (Just (m:_)) = (m `Set.member` legalMessages, m == '+')
         check _ = (False, False)
-        legalMessages = Set.fromList $ "M#+LlRrUuDdZzAaSjJ,sFNpPwtghb12345" ++ slotMessages
+        legalMessages = Set.fromList $ "M#+LlRrUuDdZzAaSjJ,sFNpPwtghbc12345" ++ slotMessages
         slotMessages = "\128\129\130\131\132\133\134\135\136\137\138"
 
 maybeRead :: Read a => String -> Maybe a