gameServer/Utils.hs
changeset 2309 1c106b0d36da
parent 2305 a51f5f88f3cf
child 2310 581e59f123a2
--- a/gameServer/Utils.hs	Wed Aug 12 15:04:16 2009 +0000
+++ b/gameServer/Utils.hs	Wed Aug 12 15:32:29 2009 +0000
@@ -41,7 +41,7 @@
 		test Nothing = False
 		test (Just (m:ms)) = m `Set.member` legalMessages
 		test _ = False
-		legalMessages = Set.fromList $ "M#+RrUuDdZzAaSjJ,sFNpPwtghb12345" ++ slotMessages
+		legalMessages = Set.fromList $ "M#+LlRrUuDdZzAaSjJ,sFNpPwtghb12345" ++ slotMessages
 		slotMessages = ['\128', '\129', '\130', '\131', '\132', '\133', '\134', '\135', '\136', '\137', '\138']
 
 maybeRead :: Read a => String -> Maybe a