hedgewars/uLand.pas
changeset 840 3c0028245ff3
parent 827 ee4fa9ff2a7b
child 883 07a568ba44e0
--- a/hedgewars/uLand.pas	Sun Apr 13 12:29:26 2008 +0000
+++ b/hedgewars/uLand.pas	Sun Apr 13 12:33:16 2008 +0000
@@ -631,7 +631,6 @@
 end;
 
 procedure UpdateLandTexture(Y, Height: LongInt);
-var i: integer;
 begin
 if LandTexture <> nil then
    begin