hedgewars/GSHandlers.inc
changeset 4795 d2f9f71b4491
parent 4792 68f9b331014a
child 4796 40f29f4300aa
--- a/hedgewars/GSHandlers.inc	Fri Dec 31 04:08:57 2010 +0100
+++ b/hedgewars/GSHandlers.inc	Fri Dec 31 19:31:37 2010 +0100
@@ -629,7 +629,7 @@
                     begin
     ////////////////////////////////// TODO - ASK UNC0RR FOR A GOOD HOME FOR THIS ////////////////////////////////////
                     dec(yy,3);
-                    dec(xx,2);
+                    dec(xx,1);
                     s:= SpritesData[sprSnow].Surface;
                     p:= s^.pixels;
                     allpx:= true;
@@ -653,13 +653,8 @@
                         p:= @(p^[s^.pitch shr 2])
                         end;
                     
-                    for py:= (yy) to (yy+1) do
-                        begin
-                        for px:= (xx+2) to (xx+3) do
-                            begin
-                            Land[py, px]:= lfBasic;
-                            end;
-                        end;
+                    
+                    Land[py, px+1]:= lfBasic;
                     
                     if allpx then UpdateLandTexture(xx, Pred(s^.h), yy, Pred(s^.w))
                     else