gameServer/HWProtoCore.hs
changeset 13831 b07610de9957
parent 13827 28a86816dc01
child 13845 1a1fb597da8f
--- a/gameServer/HWProtoCore.hs	Thu Oct 04 17:46:01 2018 +0200
+++ b/gameServer/HWProtoCore.hs	Thu Oct 04 17:55:08 2018 +0200
@@ -78,8 +78,6 @@
         h "SAVE" n | not $ B.null n = let (sn, ln) = B.break (== ' ') n in if B.null ln then return [] else handleCmd ["SAVE", sn, B.tail ln]
         h "DELETE" n | not $ B.null n = handleCmd ["DELETE", n]
         h "STATS" _ = handleCmd ["STATS"]
-        h "PART" m | not $ B.null m = handleCmd ["PART", m]
-                   | otherwise = handleCmd ["PART"]
         h "QUIT" m | not $ B.null m = handleCmd ["QUIT", m]
                    | otherwise = handleCmd ["QUIT"]
         h "RND" p = handleCmd ("RND" : B.words p)