changeset 4403 | 0dfe26f48ec1 |
parent 4377 | 43945842da0c |
child 4634 | 784e2df9e79a |
--- a/hedgewars/uLandGraphics.pas Sun Nov 21 19:14:45 2010 +0300 +++ b/hedgewars/uLandGraphics.pas Sun Nov 21 19:41:19 2010 +0300 @@ -40,7 +40,7 @@ function TryPlaceOnLand(cpX, cpY: LongInt; Obj: TSprite; Frame: LongInt; doPlace: boolean): boolean; implementation -uses SDLh, uLandTexture, uVariables, uUtils, uIO; +uses SDLh, uLandTexture, uVariables, uUtils, uDebug; procedure FillCircleLines(x, y, dx, dy: LongInt; Value: Longword); var i: LongInt;