hedgewars/uStore.pas
changeset 3491 4619b1ae99b5
parent 3490 016b3172b645
child 3509 d72c2219595d
equal deleted inserted replaced
3490:016b3172b645 3491:4619b1ae99b5
   416                     if (ii = sprWater) and not cReducedQuality then // HACK: We should include some sprite attribute to define the texture wrap directions
   416                     if (ii = sprWater) and not cReducedQuality then // HACK: We should include some sprite attribute to define the texture wrap directions
   417                     begin
   417                     begin
   418                         glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_CLAMP_TO_EDGE);
   418                         glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_CLAMP_TO_EDGE);
   419                     end;
   419                     end;
   420                 end;
   420                 end;
       
   421                 glTexParameterf(GL_TEXTURE_2D, GL_TEXTURE_PRIORITY, priority);
   421                 if saveSurf then Surface:= tmpsurf else SDL_FreeSurface(tmpsurf)
   422                 if saveSurf then Surface:= tmpsurf else SDL_FreeSurface(tmpsurf)
   422                 end
   423                 end
   423             else
   424             else
   424                 Surface:= nil
   425                 Surface:= nil
   425         end;
   426         end;