Mercurial Mercurial > hedgewars / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
hedgewars/uLandGraphics.pas
changeset 6097 db10abae541f
parent 6096 a00dbbf49d6c
child 6130 026fd01a5e2c 
--- a/hedgewars/uLandGraphics.pas	Fri Oct 07 23:57:14 2011 -0400
+++ b/hedgewars/uLandGraphics.pas	Sat Oct 08 00:34:41 2011 -0400
@@ -591,7 +591,8 @@
             if ((Land[ty, tx] and lfBasic) <> 0) and (((LandPixels[by,bx] and AMask) shr AShift) = 255) and not disableLandBack then
                 LandPixels[by, bx]:= LandBackPixel(tx, ty)
             else if ((Land[ty, tx] and lfObject) <> 0) or (((LandPixels[by,bx] and AMask) shr AShift) < 255) then
-                LandPixels[by, bx]:= 0
+                LandPixels[by, bx]:= 0;
+            Land[ty, tx]:= 0;
             end
         end;
     for t:= 0 to 7 do
hedgewars