--- a/hedgewars/uLandGraphics.pas	Wed Nov 17 17:22:36 2010 +0300
+++ b/hedgewars/uLandGraphics.pas	Wed Nov 17 17:45:55 2010 +0300
@@ -39,7 +39,7 @@
 function TryPlaceOnLand(cpX, cpY: LongInt; Obj: TSprite; Frame: LongInt; doPlace: boolean): boolean;
 
 implementation
-uses SDLh, uMisc, uLand, uLandTexture;
+uses SDLh, uMisc, uLand, uLandTexture, uVariables;
 
 procedure FillCircleLines(x, y, dx, dy: LongInt; Value: Longword);
 var i: LongInt;