--- a/hedgewars/uLandObjects.pas	Mon Jan 26 21:46:53 2009 +0000
+++ b/hedgewars/uLandObjects.pas	Tue Jan 27 15:34:37 2009 +0000
@@ -273,9 +273,9 @@
                    end
                 end;
              inc(y, 3);
-         until y > LAND_HEIGHT - Height;
+         until y > LAND_HEIGHT - 1 - Height;
          inc(x, getrandom(6) + 3)
-     until x > LAND_WIDTH - Width;
+     until x > LAND_WIDTH - 1 - Width;
      Result:= cnt <> 0;
      if Result then
         begin