I think, there's typo in withdraw-window:
diff --git a/window.lisp b/window.lisp
index 2b0f5b8..2dc1e40 100644
--- a/window.lisp
+++ b/window.lisp
@@ -747,7 +747,7 @@ needed."
;; This function cannot request info about WINDOW from the xserver as it may
not exist anymore.
(let ((group (window-group window))
(screen (window-screen window)))
- (dformat 1 "withdraw window ~a~%" screen)
+ (dformat 1 "withdraw window ~a~%" window)
;; Save it for later since it is only withdrawn, not destroyed.
(push window (screen-withdrawn-windows screen))
(setf (window-state window) +withdrawn-state+
--
wbr, Vitaly
_______________________________________________
Stumpwm-devel mailing list
Stumpwm-devel@nongnu.org
http://lists.nongnu.org/mailman/listinfo/stumpwm-devel
