--- a/hedgewars/uStore.pas	Sat May 05 17:19:33 2012 +0100
+++ b/hedgewars/uStore.pas	Sat May 05 17:29:04 2012 +0100
@@ -1141,6 +1141,13 @@
 
 procedure freeModule;
 begin
+    StoreRelease(false);
+    TTF_Quit();
+{$IFDEF SDL13}
+    SDL_GL_DeleteContext(SDLGLcontext);
+    SDL_DestroyWindow(SDLwindow);
+{$ENDIF}
+    SDL_Quit();
 end;
 
 end.