# HG changeset patch
# User alfadur
# Date 1542084327 -10800
# Node ID 076c9fba3fa8378fbb236582bcb37bd79749dd73
# Parent  dcf235a1f86b6525850c2e2c85cfddafafc808e9
stun airmines on explosions as well

diff -r dcf235a1f86b -r 076c9fba3fa8 hedgewars/uGearsUtils.pas
--- a/hedgewars/uGearsUtils.pas	Tue Nov 13 03:57:27 2018 +0300
+++ b/hedgewars/uGearsUtils.pas	Tue Nov 13 07:45:27 2018 +0300
@@ -181,7 +181,12 @@
                                 if (Gear^.Kind = gtHedgehog) and (Gear^.Hedgehog^.Effects[heInvulnerable] = 0) then
                                     Gear^.State:= (Gear^.State or gstMoving) and (not gstWinner);
                                 Gear^.Active:= true;
-                                if Gear^.Kind <> gtFlame then FollowGear:= Gear
+                                if Gear^.Kind <> gtFlame then FollowGear:= Gear;
+                                if Gear^.Kind = gtAirMine then
+                                    begin
+                                    Gear^.Tag:= 1;
+                                    Gear^.FlightTime:= 5000;
+                                    end
                                 end;
                             if ((Mask and EXPLPoisoned) <> 0) and (Gear^.Kind = gtHedgehog) and
                                 (Gear^.Hedgehog^.Effects[heInvulnerable] = 0) and (Gear^.Hedgehog^.Effects[heFrozen] = 0) and