diff -r f85243bf890e -r fa19f0579083 gameServer/Utils.hs --- a/gameServer/Utils.hs Sun Dec 19 13:31:55 2010 -0500 +++ b/gameServer/Utils.hs Sun Dec 19 13:33:45 2010 -0500 @@ -46,7 +46,7 @@ check Nothing = (False, False) check (Just (m:ms)) = (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