# HG changeset patch
# User Wuzzy <Wuzzy2@mail.ru>
# Date 1538673129 -7200
# Node ID 664935d80668b4be5f8df7cd28beb4cc0b4d5dff
# Parent  10a3b80130b5c5fb5d780a0eb7ed3c04195997ba
Fix another pas2c hiccup in uLandObjects

diff -r 10a3b80130b5 -r 664935d80668 hedgewars/uLandObjects.pas
--- a/hedgewars/uLandObjects.pas	Thu Oct 04 19:04:27 2018 +0200
+++ b/hedgewars/uLandObjects.pas	Thu Oct 04 19:12:09 2018 +0200
@@ -204,7 +204,7 @@
                 pLandColor:= @LandPixels[(cpY + y) div 2, (cpX + x) div 2];
 
             alpha:= (color and AMask) shr AShift;
-            if (alpha <> $FF) and (pLandColor^ <> 0) then
+            if ((alpha <> $FF) and ((pLandColor^) <> 0)) then
                 begin
                 landColor:= pLandColor^;
                 color:=