x11-wm/stumpwm.stumpwm-contrib
1
0
Fork 0
mirror of https://github.com/stumpwm/stumpwm-contrib.git synced 2026-09-10 07:26:25 -04:00
Code Issues Actions Packages Projects Releases Wiki Activity

Update swm-gaps to fix crash

Browse source 
After certain updates in stumpwm, the older code around frame parameters was not
working, leading to crash. This patch fixes that and works without crash for
current stumpwm master.
This commit is contained in:
Abhinav Tushar 2026-05-15 12:47:10 +05:30
parent 78b574de48
commit 72c508fcb2
No known key found for this signature in database
GPG key ID: 46E8C6AF45589680
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
util/swm-gaps/swm-gaps.lisp
View file

@ -61,7 +61,7 @@ HEIGHT are subtracted."
;; otherwise stumpwm will crash. Also, only modify window dimensions
;; if needed (i.e. window at least fills frame minus gap).
(when (and (< ow width)
(>= width (- (frame-width frame) ow)))
(>= width (- (stumpwm::frame-display-width (window-group win) frame) ow)))
(setf width (- width ow)))
(when (and (< oh height)
(>= height (- (stumpwm::frame-display-height (window-group win) frame) oh)))
@ -87,7 +87,7 @@ HEIGHT are subtracted."
(setf (xlib:drawable-width (window-parent win)) (window-width win)
(xlib:drawable-height (window-parent win)) (window-height win))
(let ((frame (stumpwm::window-frame win)))
(setf (xlib:drawable-width (window-parent win)) (- (frame-width frame)
(setf (xlib:drawable-width (window-parent win)) (- (stumpwm::frame-display-width (window-group win) frame)
(* 2 (xlib:drawable-border-width (window-parent win)))
ow)
(xlib:drawable-height (window-parent win)) (- (stumpwm::frame-display-height (window-group win) frame)
@ -100,6 +100,7 @@ HEIGHT are subtracted."
wy
(- (xlib:drawable-height (window-parent win)) height wy))
:cardinal 32))
(stumpwm::update-decoration win)
(update-configuration win))))
(defun reset-all-windows ()