# HG changeset patch
# User Patrice Mandin <patmandin@gmail.com>
# Date 1117749738 0
# Node ID 671bbd773c8ae059112f77c8c0ae6cc7a6373653
# Parent  5d9947da7510bf9136924fc2f61d0984902fce1c
Resize window to fit asked video mode

diff -r 5d9947da7510 -r 671bbd773c8a src/video/gem/SDL_gemvideo.c
--- a/src/video/gem/SDL_gemvideo.c	Thu Jun 02 22:00:48 2005 +0000
+++ b/src/video/gem/SDL_gemvideo.c	Thu Jun 02 22:02:18 2005 +0000
@@ -701,6 +701,19 @@
 
 			/* Open the window */
 			wind_open(GEM_handle,x2,y2,w2,h2);
+		} else {
+			/* Resize window if needed, to fit asked video mode */
+			if (modeflags & SDL_RESIZABLE) {
+				wind_get (GEM_handle, WF_WORKXYWH, &x2,&y2,&w2,&h2);
+				if ((w2&15)!=0) {
+					w2=(w2|15)+1;
+				}
+				if ((w2!=width) || (h2!=height)) {
+					if (wind_calc(WC_BORDER, GEM_win_type, x2,y2,width,height, &x2,&y2,&w2,&h2)) {
+						wind_set (GEM_handle, WF_CURRXYWH, x2,y2,w2,h2);
+					}
+				}
+			}
 		}
 
 		GEM_fullscreen = SDL_FALSE;