--- a/hedgewars/uLandObjects.pas	Sun Oct 02 03:45:09 2011 +0200
+++ b/hedgewars/uLandObjects.pas	Sun Oct 02 10:36:43 2011 -0400
@@ -97,7 +97,11 @@
                     LandPixels[(cpY + y) div 2, (cpX + x) div 2]:= p^[x];
 
         if ((Land[cpY + y, cpX + x] and $FF00) = 0) and ((p^[x] and AMask) <> 0) then
-            Land[cpY + y, cpX + x]:= lfObject
+            begin
+            Land[cpY + y, cpX + x]:= lfObject;
+            // For testing only. Intent is to flag this on objects with masks, or use it for an ice ray gun
+            if (Theme = 'Snow') or (Theme = 'Christmas') then Land[cpY + y, cpX + x]:= Land[cpY + y, cpX + x] or lfIce
+            end;
         end;
     p:= @(p^[Image^.pitch shr 2])
     end;