hedgewars/GSHandlers.inc
changeset 5774 8512b9758f67
parent 5750 6bbf7aee2cdf
child 5786 ffe2401e287f
--- a/hedgewars/GSHandlers.inc	Sun Sep 04 21:40:47 2011 +0400
+++ b/hedgewars/GSHandlers.inc	Sun Sep 04 13:54:24 2011 -0400
@@ -1126,6 +1126,7 @@
     AllInactive := false;
     HHGear := Gear^.Hedgehog^.Gear;
     dec(Gear^.Timer);
+    if ((GameFlags and gfInfAttack) <> 0) and (TurnTimeLeft > 0) then dec(TurnTimeLeft);
     if (Gear^.Timer = 0)or((Gear^.Message and gmDestroy) <> 0)or((HHGear^.State and gstHHDriven) =
        0) then
         begin
@@ -1235,6 +1236,8 @@
 begin
     AllInactive := false;
     dec(Gear^.Timer);
+    if ((GameFlags and gfInfAttack) <> 0) and (TurnTimeLeft > 0) then dec(TurnTimeLeft);
+    
     HHGear := Gear^.Hedgehog^.Gear;
 
     HedgehogChAngle(HHGear);