# HG changeset patch
# User alfadur
# Date 1565128482 -10800
# Node ID b043b5d5219ab51f4087c33922e003f3846ca5c2
# Parent  b761efebe3c44d095f514dbfdf8ded73f0f44f31
fix check for static gears

diff -r b761efebe3c4 -r b043b5d5219a hedgewars/uCollisions.pas
--- a/hedgewars/uCollisions.pas	Tue Aug 06 23:33:08 2019 +0200
+++ b/hedgewars/uCollisions.pas	Wed Aug 07 00:54:42 2019 +0300
@@ -1056,8 +1056,8 @@
 
     while Gear <> nil do
         begin
-        if (Gear^.Kind in [gtCase, gtExplosives, gtTarget, gtKnife, gtMine, gtAirMine, gtSMine]) or
-            ((Gear^.Kind = gtHedgehog) and (Gear^.CollisionIndex = 0)) then
+        if (Gear^.Kind = gtAirMine) or
+            ((Gear^.Kind in [gtCase, gtExplosives, gtTarget, gtKnife, gtMine, gtHedgehog, gtSMine]) and (Gear^.CollisionIndex = -1)) then
             begin
             gx:= hwRound(Gear^.X);
             gy:= hwRound(Gear^.Y);