diff -r fc52f7c22c9b -r 6155187bf599 hedgewars/uLandTexture.pas --- a/hedgewars/uLandTexture.pas Mon Jan 16 10:22:21 2012 +0100 +++ b/hedgewars/uLandTexture.pas Tue Jan 17 09:01:31 2012 -0500 @@ -65,7 +65,8 @@ procedure UpdateLandTexture(X, Width, Y, Height: LongInt); var tx, ty: Longword; begin - if (Width <= 0) or (Height <= 0) then exit; + if (Width <= 0) or (Height <= 0) then + exit; TryDo((X >= 0) and (X < LAND_WIDTH), 'UpdateLandTexture: wrong X parameter', true); TryDo(X + Width <= LAND_WIDTH, 'UpdateLandTexture: wrong Width parameter', true); TryDo((Y >= 0) and (Y < LAND_HEIGHT), 'UpdateLandTexture: wrong Y parameter', true); @@ -89,9 +90,9 @@ for y:= 0 to LANDTEXARH - 1 do with LandTextures[x, y] do begin - tex:= NewTexture(TEXSIZE, TEXSIZE, Pixels(x, y)); - glBindTexture(GL_TEXTURE_2D, tex^.id); - glTexParameterf(GL_TEXTURE_2D, GL_TEXTURE_PRIORITY, tpHigh); + tex:= NewTexture(TEXSIZE, TEXSIZE, Pixels(x, y)); + glBindTexture(GL_TEXTURE_2D, tex^.id); + glTexParameterf(GL_TEXTURE_2D, GL_TEXTURE_PRIORITY, tpHigh); end else for x:= 0 to LANDTEXARW -1 do