changeset 15308 | b761efebe3c4 |
parent 15307 | 9299f43ba0ec |
child 15309 | b043b5d5219a |
--- a/hedgewars/uCollisions.pas Tue Aug 06 23:47:02 2019 +0300 +++ b/hedgewars/uCollisions.pas Tue Aug 06 23:33:08 2019 +0200 @@ -1056,7 +1056,8 @@ while Gear <> nil do begin - if (Gear^.Kind = gtAirMine) or ((Gear^.Kind = gtHedgehog) and (Gear^.CollisionIndex = 0)) then + if (Gear^.Kind in [gtCase, gtExplosives, gtTarget, gtKnife, gtMine, gtAirMine, gtSMine]) or + ((Gear^.Kind = gtHedgehog) and (Gear^.CollisionIndex = 0)) then begin gx:= hwRound(Gear^.X); gy:= hwRound(Gear^.Y);