hedgewars/uGears.pas
changeset 2491 525e7d3a4958
parent 2489 43f36aea1f55
child 2492 9e80b7fc4017
--- a/hedgewars/uGears.pas	Fri Oct 16 14:48:28 2009 +0000
+++ b/hedgewars/uGears.pas	Fri Oct 16 14:53:58 2009 +0000
@@ -1684,7 +1684,7 @@
 	Gear:= t^.ar[i];
 	if (Gear^.State and gstNoDamage) = 0 then
 		begin
-		if (Gear^.Kind = gtHedgehog) and (Ammo^.State and gsttmpFlag <> 0) then Gear^.FlightTime:= 1;
+		if (Gear^.Kind = gtHedgehog) and (Ammo^.State and gsttmpFlag <> 0) and (Ammo^.Kind <> gtFlame) then Gear^.FlightTime:= 1;
 		
 		case Gear^.Kind of
 			gtHedgehog,