hedgewars/uStore.pas
changeset 2669 4eec706e86b0
parent 2666 2b8c8f16421e
child 2670 1b327b7515ed
--- a/hedgewars/uStore.pas	Sun Dec 20 20:35:15 2009 +0000
+++ b/hedgewars/uStore.pas	Thu Dec 24 02:02:12 2009 +0000
@@ -267,6 +267,8 @@
     i: LongInt;
 begin
 
+AddProgress;
+
 for fi:= Low(THWFont) to High(THWFont) do
 	with Fontz[fi] do
 		begin
@@ -356,6 +358,8 @@
 //SDL_SaveBMP_RW(StoreSurface, SDL_RWFromFile('StoreSurface.bmp', 'wb'), 1);
 {$ENDIF}
 AddProgress;
+
+IMG_Quit();
 end;
 
 procedure DrawFromRect(X, Y: LongInt; r: PSDL_Rect; SourceTexture: PTexture);