# HG changeset patch
# User unc0rr
# Date 1388315332 -14400
# Node ID 1639442827101b9c3b03fa68e7eba02f5fec0d15
# Parent  2f3355b29420a81be06b4d5e4c6ad067f2447e6a
Uberfix. TODO: ask fpc guys wtf.

diff -r 2f3355b29420 -r 163944282710 hedgewars/uLandGraphics.pas
--- a/hedgewars/uLandGraphics.pas	Sun Dec 29 15:07:51 2013 +0400
+++ b/hedgewars/uLandGraphics.pas	Sun Dec 29 15:08:52 2013 +0400
@@ -213,7 +213,7 @@
         for i:= fromPix to toPix do
             begin
             if Land[y, i] and lfObjMask > 0 then
-                Land[y, i]:= (Land[y, i] and lfNotObjMask) or ((Land[y, i] and lfObjMask) - 1);
+                Land[y, i]:= Land[y, i] - 1;
             end;
     setCurrentHog:
         for i:= fromPix to toPix do
@@ -224,7 +224,7 @@
         for i:= fromPix to toPix do
             begin
             if Land[y, i] and lfObjMask < lfObjMask then
-                Land[y, i]:= (Land[y, i] and lfNotObjMask) or ((Land[y, i] and lfObjMask) + 1)
+                Land[y, i]:= Land[y, i] + 1
             end;
     end;
 end;