mirror of
https://github.com/ch11ng/exwm.git
synced 2024-11-23 19:47:58 +01:00
Force repositioning floating Emacs frames
* exwm-floating.el (exwm-floating--set-floating): Ditto.
This commit is contained in:
parent
2b7449ea42
commit
267ebd7f55
1 changed files with 9 additions and 8 deletions
|
@ -266,14 +266,15 @@ context of the corresponding buffer.")
|
|||
;; FIXME: Strangely, the Emacs frame can move itself at this point
|
||||
;; when there are left/top struts set. Force resetting its
|
||||
;; position seems working, but it'd better to figure out why.
|
||||
(when exwm-workspace--struts
|
||||
(xcb:+request exwm--connection
|
||||
(make-instance 'xcb:ConfigureWindow
|
||||
:window outer-id
|
||||
:value-mask (logior xcb:ConfigWindow:X
|
||||
xcb:ConfigWindow:Y)
|
||||
:x 0 :y 0))
|
||||
(xcb:flush exwm--connection)))
|
||||
;; FIXME: This also happens in another case (#220) where the cause is
|
||||
;; still unclear.
|
||||
(xcb:+request exwm--connection
|
||||
(make-instance 'xcb:ConfigureWindow
|
||||
:window outer-id
|
||||
:value-mask (logior xcb:ConfigWindow:X
|
||||
xcb:ConfigWindow:Y)
|
||||
:x 0 :y 0))
|
||||
(xcb:flush exwm--connection))
|
||||
(with-current-buffer (exwm--id->buffer id)
|
||||
(run-hooks 'exwm-floating-setup-hook))
|
||||
;; Redraw the frame.
|
||||
|
|
Loading…
Reference in a new issue