diff -r dfbe55237c64 -r 8056d82b4d23 hedgewars/uStore.pas --- a/hedgewars/uStore.pas Sun Aug 14 13:45:37 2011 -0400 +++ b/hedgewars/uStore.pas Sun Aug 14 16:59:55 2011 -0400 @@ -390,13 +390,13 @@ i, t: LongInt; begin for ii:= Low(TSprite) to High(TSprite) do - begin + begin FreeTexture(SpritesData[ii].Texture); SpritesData[ii].Texture:= nil; if SpritesData[ii].Surface <> nil then SDL_FreeSurface(SpritesData[ii].Surface); SpritesData[ii].Surface:= nil; - end; + end; SDL_FreeSurface(MissionIcons); FreeTexture(ropeIconTex); FreeTexture(HHTexture); @@ -405,14 +405,12 @@ FreeTexture(SyncTexture); // free all ammo name textures for ai:= Low(TAmmoType) to High(TAmmoType) do - begin FreeTexture(Ammoz[ai].NameTex); - end; + // free all count textures for i:= Low(CountTexz) to High(CountTexz) do - begin FreeTexture(CountTexz[i]); - end; + // free all team and hedgehog textures for t:= 0 to Pred(TeamsCount) do begin @@ -465,10 +463,10 @@ tmpsurf:= IMG_Load(Str2PChar(s)); if tmpsurf = nil then - begin + begin OutError(msgFailed, (imageFlags and ifCritical) <> 0); exit(nil) - end; + end; if ((imageFlags and ifIgnoreCaps) = 0) and ((tmpsurf^.w > MaxTextureSize) or (tmpsurf^.h > MaxTextureSize)) then begin @@ -1006,9 +1004,7 @@ end; // init all count texture pointers for i:= Low(CountTexz) to High(CountTexz) do - begin CountTexz[i] := nil; - end; end; procedure freeModule;