diff -r 3c36a4e66c82 -r 1bdce164eb72 hedgewars/uGearsUtils.pas --- a/hedgewars/uGearsUtils.pas Mon Nov 12 20:30:06 2018 +0300 +++ b/hedgewars/uGearsUtils.pas Tue Nov 13 01:56:42 2018 +0300 @@ -1242,7 +1242,13 @@ t^.State:= t^.State or gstMoving; if t^.Kind = gtKnife then t^.State:= t^.State and (not gstCollision); t^.Active:= true; - FollowGear:= t + FollowGear:= t; + + if t^.Kind = gtAirmine then + begin + t^.Tag:= 1; + t^.FlightTime:= 5000; + end end end; gtGrave: begin @@ -1388,7 +1394,13 @@ State:= ord(sprStar) end end; - ApplyDamage(Gear, Ammo^.Hedgehog, tmpDmg, dsShove) + ApplyDamage(Gear, Ammo^.Hedgehog, tmpDmg, dsShove); + + if Gear^.Kind = gtAirmine then + begin + Gear^.Tag:= 1; + Gear^.FlightTime:= 5000; + end end else Gear^.State:= Gear^.State or gstWinner;