--- a/hedgewars/GSHandlers.inc	Mon Feb 25 12:54:50 2013 -0500
+++ b/hedgewars/GSHandlers.inc	Mon Feb 25 13:51:45 2013 -0500
@@ -5148,6 +5148,7 @@
     w:= (w shl RShift) or (w shl BShift) or (w shl GShift) or (LandPixels[y,x] and AMask);
     //LandPixels[y, x]:= w;
     LandPixels[y, x]:= addBgColor(w, c);
+    LandPixels[y, x]:= addBgColor(LandPixels[y, x], icePixels^[iceSurface^.w * (y mod iceSurface^.h) + (x mod iceSurface^.w)]);
 
     Land[y, x] := land[y, x] or lfIce;
 end;