[STUMP] [PATCH] Fix wrong background color of the parent window.

[David Hansen]

Hello,

this patch uses the screen background color instead of the window border
color as the background of the parent window.

This fixes a to big visual border of windows with geometry hints.

David

diff --git a/core.lisp b/core.lisp
index 240e2ab..fdd7b25 100644
--- a/core.lisp
+++ b/core.lisp
@@ -474,10 +474,12 @@ Groups are known as \"virtual desktops\" in the NETWM 
standard."
                  (screen-focus-color screen)
                  (screen-unfocus-color screen))))
       (setf (xlib:window-border (window-parent window)) c
-            ;; windows that dont fill the entire screen have a transparent 
background.
+            ;; Windows that don't fill the entire screen have a transparent
+            ;; background.
             (xlib:window-background (window-parent window))
             (if (eq (window-type window) :normal)
-                c :none))
+                (screen-bg-color screen)
+                :none))
       ;; get the background updated
       (xlib:clear-area (window-parent window)))))