hedgewars/uLandTexture.pas
changeset 3491 4619b1ae99b5
parent 3165 3ec07a7d8456
child 3509 d72c2219595d
--- a/hedgewars/uLandTexture.pas	Wed Jun 02 13:52:23 2010 +0000
+++ b/hedgewars/uLandTexture.pas	Thu Jun 03 14:03:48 2010 +0000
@@ -83,7 +83,11 @@
     for x:= 0 to LANDTEXARW -1 do
         for y:= 0 to LANDTEXARH - 1 do
             with LandTextures[x, y] do
-                tex:= NewTexture(TEXSIZE, TEXSIZE, Pixels(x, y))
+                begin
+                    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
         for y:= 0 to LANDTEXARH - 1 do