# HG changeset patch
# User sheepluva
# Date 1480201225 -3600
# Node ID 78e9fbd52ffcd675f5f0876a9610d8b6907bbc09
# Parent  ba1807589eaa6f77610a5c5745b8b77141387ce4
simplify code of previous commit ( ba1807589eaa )

diff -r ba1807589eaa -r 78e9fbd52ffc hedgewars/uLand.pas
--- a/hedgewars/uLand.pas	Sat Nov 26 23:46:31 2016 +0100
+++ b/hedgewars/uLand.pas	Sun Nov 27 00:00:25 2016 +0100
@@ -706,7 +706,7 @@
                         c:= AMask
                     else
                         c:= AMask or RMask or GMask; // FF00FFFF
-                    if (y + rightX - 5 + w) mod 32 < 16 then
+                    if (y + rightX - w) mod 32 < 16 then
                         c2:= AMask
                     else
                         c2:= AMask or RMask or GMask; // FF00FFFF
@@ -714,12 +714,12 @@
                     if (cReducedQuality and rqBlurryLand) = 0 then
                         begin
                         LandPixels[y, leftX + w]:= c;
-                        LandPixels[y, rightX - 5 + w]:= c2;
+                        LandPixels[y, rightX - w]:= c2;
                         end
                     else
                         begin
                         LandPixels[y div 2, (leftX + w) div 2]:= c;
-                        LandPixels[y div 2, (rightX - 5 + w) div 2]:= c2;
+                        LandPixels[y div 2, (rightX - w) div 2]:= c2;
                         end;
                     end;