hedgewars/GSHandlers.inc
changeset 8727 43b1487f02f6
parent 8679 a8bdcf7bec20
child 8730 b39f433f8ab4
--- a/hedgewars/GSHandlers.inc	Tue Mar 12 22:41:26 2013 +0100
+++ b/hedgewars/GSHandlers.inc	Tue Mar 12 22:13:38 2013 -0400
@@ -1020,7 +1020,7 @@
         if ((y and LAND_HEIGHT_MASK) = 0) and ((x and LAND_WIDTH_MASK) = 0) and (Land[y, x] <> 0) then
             inc(Gear^.Damage);
         // let's interrupt before a collision to give portals a chance to catch the bullet
-        if (Gear^.Damage = 1) and (Gear^.Tag = 0) and (Land[y, x] > 255) then
+        if (Gear^.Damage = 1) and (Gear^.Tag = 0) and not(CheckLandValue(x, y, $FF00)) then
             begin
             Gear^.Tag := 1;
             Gear^.Damage := 0;