--- a/hedgewars/uGearsList.pas	Sat Nov 22 00:55:01 2014 +0300
+++ b/hedgewars/uGearsList.pas	Wed Dec 03 00:07:33 2014 +0300
@@ -156,7 +156,7 @@
 
 function AddGear(X, Y: LongInt; Kind: TGearType; State: Longword; dX, dY: hwFloat; Timer: LongWord): PGear;
 var gear: PGear;
-    c: byte;
+    //c: byte;
 begin
 inc(GCounter);
 
@@ -408,6 +408,7 @@
                 gear^.Radius:= 1;
                 gear^.Health:= 5;
                 gear^.Density:= _1;
+                gear^.FlightTime:= 9999999; // determines whether in-air flames do damage. disabled by default
                 if (gear^.dY.QWordValue = 0) and (gear^.dX.QWordValue = 0) then
                     begin
                     gear^.dY:= (getrandomf - _0_8) * _0_03;