gameServer/HWProtoCore.hs
changeset 8401 87410ae372f6
parent 8396 5123eac2f9d6
child 8403 fbc6e7602e05
--- a/gameServer/HWProtoCore.hs	Fri Jan 18 11:47:23 2013 +0100
+++ b/gameServer/HWProtoCore.hs	Sat Jan 19 00:51:28 2013 +0400
@@ -23,7 +23,7 @@
 
 handleCmd ("QUIT" : xs) = return [ByeClient msg]
     where
-        msg = if not $ null xs then head xs else "bye"
+        msg = if not $ null xs then head xs else loc "bye"
 
 
 handleCmd ["PONG"] = do