Re: mouse not dragging a float window.
Eric S Fraga <[email protected]> Thu, 01 Sep 2022 15:51:34 +0100
| Newsgroups | gmane.comp.window-managers.stumpwm.devel |
|---|---|
| Organization | On the Interweb somewhere |
| Message-ID | <[email protected]> |
with a minor refactoring of the actual resize function:
--8<---------------cut here---------------start------------->8---
(defcommand (esf-resize-window float-group) (dw dh)
((:number "dW = ") (:number "dH = "))
(let* ((window (current-window))
(parent (window-parent window))
(w (xlib:drawable-width parent))
;; get actual height: ignore title bar
(h (- (xlib:drawable-height parent) *float-window-title-height*)))
(float-window-move-resize window
:width (+ w dw)
:height (+ h dh))))
--8<---------------cut here---------------end--------------->8---
--
Eric S Fraga via gnus (Emacs 29.0.50 2022-08-16) on Debian 11.4