--- a/hedgewars/uLandGraphics.pas	Mon Feb 26 17:09:13 2007 +0000
+++ b/hedgewars/uLandGraphics.pas	Sun Mar 11 17:19:28 2007 +0000
@@ -269,13 +269,11 @@
 end;
 
 function TryPlaceOnLand(cpX, cpY: LongInt; Obj: TSprite; Frame: LongInt): boolean;
-var Result: boolean;
-    X, Y, sY, bpp, h, w: LongInt;
+var X, Y, bpp, h, w: LongInt;
     p: PByteArray;
     r, rr: TSDL_Rect;
     Image: PSDL_Surface;
 begin
-Result:= true;
 Image:= SpritesData[Obj].Surface;
 w:= SpritesData[Obj].Width;
 h:= SpritesData[Obj].Height;