diff -r fcea0c053bc1 -r a057306acea6 hedgewars/uLandTexture.pas --- a/hedgewars/uLandTexture.pas Mon Nov 14 13:31:38 2011 -0500 +++ b/hedgewars/uLandTexture.pas Sat Nov 19 14:30:58 2011 -0500 @@ -31,7 +31,7 @@ implementation uses uConsts, GLunit, uTypes, uVariables, uTextures, uDebug, uRender; -const TEXSIZE = 256; +const TEXSIZE = 512; type TLandRecord = record shouldUpdate: boolean; @@ -139,11 +139,11 @@ procedure ResetLand; var x, y: LongInt; begin - for x:= 0 to LANDTEXARW -1 do + for x:= 0 to LANDTEXARW - 1 do for y:= 0 to LANDTEXARH - 1 do with LandTextures[x, y] do begin - if tex <> nil then FreeTexture(tex); + FreeTexture(tex); tex:= nil; end; end;