oops
authornemo
Sun, 09 Oct 2011 19:48:13 -0400
changeset 6113 b3dfb796c3a5
parent 6112 7839a2ae90ae
child 6114 443cce9e060f
oops
hedgewars/uLandObjects.pas
--- a/hedgewars/uLandObjects.pas	Sun Oct 09 19:36:09 2011 -0400
+++ b/hedgewars/uLandObjects.pas	Sun Oct 09 19:48:13 2011 -0400
@@ -96,11 +96,11 @@
                 if LandPixels[(cpY + y) div 2, (cpX + x) div 2] = 0 then 
                     LandPixels[(cpY + y) div 2, (cpX + x) div 2]:= p^[x];
 
-        Land[cpY + y, cpX + x]:= Land[cpY + y, cpX + x] or extraFlags;
 
         if ((Land[cpY + y, cpX + x] and $FF00) = 0) and ((p^[x] and AMask) <> 0) then
             begin
             Land[cpY + y, cpX + x]:= lfObject;
+            Land[cpY + y, cpX + x]:= Land[cpY + y, cpX + x] or extraFlags
             end;
         end;
     p:= @(p^[Image^.pitch shr 2])