hedgewars/hwengine.pas
changeset 4933 86bd82d58a0b
parent 4929 3dca560e6510
child 4935 27fb500dd6b1
--- a/hedgewars/hwengine.pas	Sun Feb 06 21:50:29 2011 +0300
+++ b/hedgewars/hwengine.pas	Mon Feb 07 23:12:56 2011 +0100
@@ -104,7 +104,7 @@
         end;
 
 {$IFDEF SDL13}
-    SDL_RenderPresent();
+    SDL_RenderPresent(SDLrender);
 {$ELSE}
     SDL_GL_SwapBuffers();
 {$ENDIF}
@@ -130,7 +130,8 @@
     CloseIPC();
     TTF_Quit();
 {$IFDEF SDL13}
-    SDL_DestroyRenderer(SDLwindow);
+    SDL_RenderClear(SDLrender);
+    SDL_DestroyRenderer(SDLrender);
     SDL_DestroyWindow(SDLwindow);
 {$ENDIF}
     SDL_Quit();