hedgewars/uGears.pas
changeset 9103 b70352db5675
parent 9080 9b42757d7e71
child 9127 e350500c4edb
child 9224 bce8cf41d666
--- a/hedgewars/uGears.pas	Tue Jun 04 00:15:03 2013 +0400
+++ b/hedgewars/uGears.pas	Mon Jun 03 23:59:55 2013 -0400
@@ -774,7 +774,8 @@
     begin
     dec(i);
     Gear:= t^.ar[i];
-    if (Ammo^.Kind = gtFlame) and (Gear^.Kind = gtHedgehog) and (Gear^.Hedgehog^.Effects[heFrozen] > 255) then
+    if ((Ammo^.Kind = gtFlame) or (Ammo^.Kind = gtBlowTorch)) and 
+       (Gear^.Kind = gtHedgehog) and (Gear^.Hedgehog^.Effects[heFrozen] > 255) then
         Gear^.Hedgehog^.Effects[heFrozen]:= max(255,Gear^.Hedgehog^.Effects[heFrozen]-10000);
     tmpDmg:= ModifyDamage(Damage, Gear);
     if (Gear^.State and gstNoDamage) = 0 then