diff -r 33ab77c0b486 -r 87410ae372f6 gameServer/HWProtoCore.hs --- 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