about summary refs log tree commit diff
diff options
context:
space:
mode:
authorChris Feng <chris.w.feng@gmail.com>2019-02-01T00·00+0000
committerChris Feng <chris.w.feng@gmail.com>2019-02-01T00·00+0000
commit65d371d55f22109a6ab886df4c7dfcdb4b893e6c (patch)
treea362b954b4136e2deb6559999da9b67f3256b647
parent993ca8a13a82c93851b9bd4f023a85b06f530782 (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.el4
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)