Mercurial Mercurial > hedgewars / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
hedgewars/uLandGenTemplateBased.pas
changeset 14286 7a7c090f96f6
parent 14285 a7810074c20d
child 15900 128ace913837 
--- a/hedgewars/uLandGenTemplateBased.pas	Fri Nov 23 16:38:47 2018 -0500
+++ b/hedgewars/uLandGenTemplateBased.pas	Fri Nov 23 21:38:34 2018 -0500
@@ -116,7 +116,7 @@
             or (dab < minDistance * 3)
             or (mp.x < leftX + mapBorderMargin)
             or (mp.x > rightX - mapBorderMargin)
-            or (mp.y < LongInt(topY) + mapBorderMargin)
+            or (mp.y < topY + mapBorderMargin)
             or (mp.y > LongInt(LAND_HEIGHT) - mapBorderMargin)
     then
     begin
@@ -146,7 +146,7 @@
     if b <> 0 then
     begin
         // top border
-        ix:= (LongInt(topY) + mapBorderMargin - mp.y) * a div b + mp.x;
+        ix:= (topY + mapBorderMargin - mp.y) * a div b + mp.x;
         d:= DistanceI(mp.y - topY - mapBorderMargin, mp.x - ix).Round;
         t2:= b * (mp.y - mapBorderMargin) + a * (mp.x - ix);
         if t2 > 0 then distL:= min(d, distL) else distR:= min(d, distR);
hedgewars