hedgewars/hwengine.pas
changeset 5505 a55aab592950
parent 5242 e4f6aa3250eb
child 5521 3be9fda5c3c2
--- a/hedgewars/hwengine.pas	Fri Aug 05 01:22:51 2011 +0200
+++ b/hedgewars/hwengine.pas	Sat Aug 06 07:09:30 2011 +0200
@@ -104,7 +104,7 @@
         end;
 
 {$IFDEF SDL13}
-    SDL_RenderPresent(SDLrender);
+    SDL_GL_SwapWindow(SDLwindow);
 {$ELSE}
     SDL_GL_SwapBuffers();
 {$ENDIF}
@@ -129,10 +129,9 @@
     CloseIPC();
     TTF_Quit();
 {$IFDEF SDL13}
-    SDL_RenderClear(SDLrender);
-    SDL_DestroyRenderer(SDLrender);
+    SDL_GL_DeleteContext(SDLGLcontext);
     SDL_DestroyWindow(SDLwindow);
-    SDLrender:= nil;
+    SDLGLcontext:= nil;
     SDLwindow:= nil;
 {$ENDIF}
     SDL_Quit();