diff options
| author | Chris Feng <chris.w.feng@gmail.com> | 2019-02-01T00·00+0000 |
|---|---|---|
| committer | Chris Feng <chris.w.feng@gmail.com> | 2019-02-01T00·00+0000 |
| commit | 65d371d55f22109a6ab886df4c7dfcdb4b893e6c (patch) | |
| tree | a362b954b4136e2deb6559999da9b67f3256b647 | |
| parent | 993ca8a13a82c93851b9bd4f023a85b06f530782 (diff) | |
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.
| -rw-r--r-- | exwm-manage.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/exwm-manage.el b/exwm-manage.el index 20546bd044be..759ec0b77666 100644 --- a/exwm-manage.el +++ b/exwm-manage.el @@ -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) |