fix issue 2 - taunts during AI turns
authorkoda
Fri, 05 Nov 2010 16:07:39 +0100
changeset 4121 22b1acc0e461
parent 4119 0d3e701491fb
child 4122 c80434d6f314
fix issue #2 - taunts during AI turns
hedgewars/uChat.pas
--- a/hedgewars/uChat.pas	Fri Nov 05 11:06:22 2010 -0400
+++ b/hedgewars/uChat.pas	Fri Nov 05 16:07:39 2010 +0100
@@ -245,7 +245,8 @@
     end;
 if (s[1] = '/') and (copy(s, 1, 4) <> '/me ') then
     begin
-    if CurrentTeam^.ExtDriven then exit;
+    if CurrentTeam^.ExtDriven or (CurrentTeam^.Hedgehogs[0].BotLevel <> 0) then
+        exit;
 
     for i:= Low(TWave) to High(TWave) do
         if (s = Wavez[i].cmd) then