hedgewars/uLandGraphics.pas
changeset 10378 c2b976d6c4f1
parent 10374 c7ef47665410
child 10490 b30b8d39d662
--- a/hedgewars/uLandGraphics.pas	Tue Aug 12 13:21:32 2014 +0400
+++ b/hedgewars/uLandGraphics.pas	Tue Aug 12 17:58:36 2014 +0400
@@ -624,7 +624,7 @@
 
 function ForcePlaceOnLand(cpX, cpY: LongInt; Obj: TSprite; Frame: LongInt; LandFlags: Word): boolean; inline;
 begin
-    ForcePlaceOnLand:= TryPlaceOnLand(cpX, cpY, Obj, Frame, true, true, true, LandFlags)
+    ForcePlaceOnLand:= TryPlaceOnLand(cpX, cpY, Obj, Frame, true, false, true, LandFlags)
 end;
 
 function TryPlaceOnLand(cpX, cpY: LongInt; Obj: TSprite; Frame: LongInt; doPlace, outOfMap, force: boolean; LandFlags: Word): boolean;