only digest masks for masked land object
authoralfadur
Mon, 19 Aug 2019 21:17:18 +0300
changeset 15345 a81bd0b5aad8
parent 15344 9fca575e3c88
child 15346 84108dc45ee7
only digest masks for masked land object
hedgewars/uLandObjects.pas
--- a/hedgewars/uLandObjects.pas	Mon Aug 19 18:59:24 2019 +0300
+++ b/hedgewars/uLandObjects.pas	Mon Aug 19 21:17:18 2019 +0300
@@ -959,7 +959,8 @@
             Delete(s, 1, i);
             if (Maxcnt < 1) or (Maxcnt > MAXTHEMEOBJECTS) then
                 OutError('Broken theme. Object''s max. count should be between 1 and '+ inttostr(MAXTHEMEOBJECTS) +' (it was '+ inttostr(Maxcnt) +').', true);
-            ChecksumLandObjectImage(Surf, true);
+            if Mask = nil then
+                ChecksumLandObjectImage(Surf, true);
             ChecksumLandObjectImage(Mask, false);
 
             inrectcnt := 0;