changeset 8403 | fbc6e7602e05 |
parent 8401 | 87410ae372f6 |
child 8478 | d12531f09d59 |
--- a/gameServer/HWProtoCore.hs Sat Jan 19 00:55:51 2013 +0400 +++ b/gameServer/HWProtoCore.hs Sat Jan 19 21:51:41 2013 +0400 @@ -41,6 +41,7 @@ return [] where h ["DELEGATE", n] = handleCmd ["DELEGATE", n] + h ["STATS"] = handleCmd ["STATS"] h c = return [Warning . B.concat . L.intersperse " " $ "Unknown cmd" : c] handleCmd cmd = do