From 007916c64763b53f37fb7c759a145857f63c1c76 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Adri=C3=A1n=20Medra=C3=B1o=20Calvo?=
 <adrian@medranocalvo.com>
Date: Wed, 15 Apr 2020 00:00:00 +0000
Subject: [PATCH] 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.
---
 exwm.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/exwm.el b/exwm.el
index 09192fa..e94b283 100644
--- a/exwm.el
+++ b/exwm.el
@@ -730,10 +730,11 @@
                        :visual 0
                        :value-mask xcb:CW:OverrideRedirect
                        :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
         (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))
       ;; Set _NET_SUPPORTING_WM_CHECK
       (xcb:+request exwm--connection