Fix window manager name

* exwm.el (exwm--init-icccm-ewmh): Correct _NET_WM_NAME to the
	name of the window manager on the _NET_SUPPORTING_WM_CHECK.
This commit is contained in:
Adrián Medraño Calvo 2020-04-15 00:00:00 +00:00
parent 95d6aa96cf
commit 007916c647

View file

@ -730,10 +730,11 @@
:visual 0 :visual 0
:value-mask xcb:CW:OverrideRedirect :value-mask xcb:CW:OverrideRedirect
:override-redirect 1)) :override-redirect 1))
;; Set _NET_WM_NAME ;; Set _NET_WM_NAME. Must be set to the name of the window manager, as
;; required by wm-spec.
(xcb:+request exwm--connection (xcb:+request exwm--connection
(make-instance 'xcb:ewmh:set-_NET_WM_NAME (make-instance 'xcb:ewmh:set-_NET_WM_NAME
:window new-id :data "EXWM: exwm--guide-window")) :window new-id :data "EXWM"))
(dolist (i (list exwm--root new-id)) (dolist (i (list exwm--root new-id))
;; Set _NET_SUPPORTING_WM_CHECK ;; Set _NET_SUPPORTING_WM_CHECK
(xcb:+request exwm--connection (xcb:+request exwm--connection