hedgewars/uLandGraphics.pas
changeset 10957 f3fcba306da9
parent 10909 594f59bd1751
child 11046 47a8c19ecb60
--- a/hedgewars/uLandGraphics.pas	Sun May 24 15:44:21 2015 -0400
+++ b/hedgewars/uLandGraphics.pas	Mon May 25 14:31:06 2015 -0400
@@ -89,7 +89,8 @@
 
 procedure drawPixelEBC(landX, landY, pixelX, pixelY: Longint); inline;
 begin
-if ((Land[landY, landX] and lfBasic) <> 0) or ((Land[landY, landX] and lfObject) <> 0) then
+if (Land[landY, landX] and lfIndestructible = 0) and 
+    (((Land[landY, landX] and lfBasic) <> 0) or ((Land[landY, landX] and lfObject) <> 0)) then
     begin
     LandPixels[pixelY, pixelX]:= ExplosionBorderColor;
     Land[landY, landX]:= (Land[landY, landX] or lfDamaged) and (not lfIce);