[STUMP] SDL windows in fullscreen mode

[Philippe Brochard]

Hi stumpers,

I have had a bug in CLFSWM with SDL windows when they are fullscreen
maximized. A black window comes in front of them preventing to see
them. This is the case with xmoto, prboom, ceferino, nexuiz-sdl for
example.
Following the ICEWM code it seems that when a window has null width
and height they are maximized and there is no need to handle them
(just map them).

Attached is a patch for STUMPWM.

Regards,

Philippe

diff --git a/window.lisp b/window.lisp
index 2b0f5b8..e1a303c 100644
--- a/window.lisp
+++ b/window.lisp
@@ -312,12 +312,16 @@ _NET_WM_STATE_DEMANDS_ATTENTION set"
 ;; FIXME: should we raise the winodw or its parent?
 (defmethod raise-window (win)
   "Map the window if needed and bring it to the top of the stack. Does not 
affect focus."
-  (when (window-urgent-p win)
-    (window-clear-urgency win))
-  (when (window-hidden-p win)
-    (unhide-window win)
-    (update-configuration win))
-  (when (window-in-current-group-p win)
-    (setf (xlib:window-priority (window-parent win)) :top-if)))
+  (let* ((hints (xlib:wm-normal-hints (window-xwin win)))
+        (width (and hints (xlib:wm-size-hints-width hints)))
+        (height (and hints (xlib:wm-size-hints-height hints))))
+    (when (window-urgent-p win)
+      (window-clear-urgency win))
+    (when (window-hidden-p win)
+      (unhide-window win)
+      (when (and width height)
+       (update-configuration win)))
+    (when (and width height (window-in-current-group-p win))
+      (setf (xlib:window-priority (window-parent win)) :top-if))))

 ;; some handy wrappers