--- a/hedgewars/uLandGraphics.pas	Wed Feb 27 16:44:19 2013 +0100
+++ b/hedgewars/uLandGraphics.pas	Wed Feb 27 11:17:45 2013 -0500
@@ -311,8 +311,8 @@
         end
     else if (isLandscapeEdge(weight)) then
         begin
-        LandPixels[y, x] := $FFB2AF8A;
-        if Land[y, x] > 255 then Land[y, x] := Land[y, x] or lfIce;
+        LandPixels[y, x] := IceEdgeColor;
+        if Land[y, x] > 255 then Land[y, x] := Land[y, x] or lfIce and not lfDamaged;
         end;
 
 end;