gameServer/HWProtoInRoomState.hs
changeset 15908 014f4edd0421
parent 15900 fc3cb23fd26f
--- a/gameServer/HWProtoInRoomState.hs	Thu Oct 06 20:58:54 2022 +0300
+++ b/gameServer/HWProtoInRoomState.hs	Sun Oct 16 13:14:16 2022 +0300
@@ -387,6 +387,12 @@
         engineMsg cl = toEngineMsg $ B.concat ["b", nick cl, "]", msg, "\x20\x20"]
 
 
+handleCmd_inRoom ["TEAMDRAW", msg] = do
+    cl <- thisClient
+    chans <- roomSameClanChans
+    return [AnswerClients chans ["TEAMDRAW", nick cl, msg]]
+
+
 handleCmd_inRoom ["BAN", banNick] = do
     (thisClientId, rnc) <- ask
     maybeClientId <- clientByNick banNick