hedgewars/uLandGenTemplateBased.pas
changeset 10478 12662c21e0e9
parent 10477 b219c5a2317f
child 10494 0eb97cf4c78e
--- a/hedgewars/uLandGenTemplateBased.pas	Sun Nov 09 14:58:43 2014 -0500
+++ b/hedgewars/uLandGenTemplateBased.pas	Sun Nov 09 23:44:13 2014 +0300
@@ -152,6 +152,10 @@
         iy:= (rightX - mapBorderMargin - mp.x) * b div a + mp.y;
         d:= DistanceI(mp.x - rightX + mapBorderMargin, mp.y - iy).Round;
         if t1 > 0 then distR:= d else distL:= d;
+    end else
+    begin
+        distL:= LAND_WIDTH + LAND_HEIGHT;
+        distR:= distL;
     end;
 
     if b <> 0 then