mirror of
https://github.com/emacs-exwm/exwm.git
synced 2024-11-27 14:57:59 +01:00
Fetch necessary properties before checking per-app configurations
* exwm-manage.el (exwm-manage--manage-window): Fetch X window title & protocols so they can be available when checking per-application configurations.
This commit is contained in:
parent
993ca8a13a
commit
65d371d55f
1 changed files with 2 additions and 2 deletions
|
@ -217,6 +217,8 @@ You can still make the X windows floating afterwards."
|
|||
(exwm--update-hints id)
|
||||
(exwm-manage--update-geometry id)
|
||||
(exwm-manage--update-mwm-hints id)
|
||||
(exwm--update-title id)
|
||||
(exwm--update-protocols id)
|
||||
(setq exwm--configurations (exwm-manage--get-configurations))
|
||||
;; OverrideRedirect is not checked here.
|
||||
(when (and
|
||||
|
@ -311,8 +313,6 @@ You can still make the X windows floating afterwards."
|
|||
:button button :modifiers xcb:ModMask:Any)))
|
||||
(exwm-manage--set-client-list)
|
||||
(xcb:flush exwm--connection)
|
||||
(exwm--update-title id)
|
||||
(exwm--update-protocols id)
|
||||
(if (plist-member exwm--configurations 'floating)
|
||||
;; User has specified whether it should be floating.
|
||||
(if (plist-get exwm--configurations 'floating)
|
||||
|
|
Loading…
Reference in a new issue