--- a/gameServer/HandlerUtils.hs	Thu Mar 20 22:14:30 2014 +0400
+++ b/gameServer/HandlerUtils.hs	Sun Mar 23 23:35:33 2014 +0400
@@ -8,6 +8,8 @@
 import CoreTypes
 
 
+type CmdHandler = [B.ByteString] -> Reader (ClientIndex, IRnC) [Action]
+
 thisClient :: Reader (ClientIndex, IRnC) ClientInfo
 thisClient = do
     (ci, rnc) <- ask