hedgewars/uLandObjects.pas
changeset 12168 666e18b1ca32
parent 12097 ebe87b6ed182
child 12189 31184d9b9bfc
--- a/hedgewars/uLandObjects.pas	Wed Apr 05 18:23:10 2017 +0200
+++ b/hedgewars/uLandObjects.pas	Thu Apr 06 05:54:45 2017 +0200
@@ -396,6 +396,10 @@
     repeat
         y:= topY+32; // leave room for a hedgie to teleport in
         repeat
+
+            if (inland[1].x = 0) and (inland[1].y = 0) and (inland[1].w = 0) and (inland[1].h = 0) then
+                y := LAND_HEIGHT - Height;
+
             if CheckCanPlace(x, y, Obj) then
                 begin
                 ar[cnt].x:= x;