branch: externals/exwm
commit 4f7ac815d1b3f70f4fabf51275cbd5b5a6ef3b59
Author: Steven Allen <[email protected]>
Commit: Steven Allen <[email protected]>
; Fix last commit
* exwm.el (exwm--on-net-wm-desktop): Compare against the correct ID.
---
exwm.el | 7 ++++---
1 file changed, 4 insertions(+), 3 deletions(-)
diff --git a/exwm.el b/exwm.el
index 54753871a0..f2d995dc48 100644
--- a/exwm.el
+++ b/exwm.el
@@ -702,10 +702,11 @@ DATA contains unmarshalled PropertyNotify event data."
(defun exwm--on-net-wm-desktop (id data)
"Handle _NET_WM_DESKTOP message with ID and DATA."
- (let ((buffer (exwm--id->buffer id)))
+ (let ((buffer (exwm--id->buffer id))
+ (workspace (elt data 0)))
(when (and (buffer-live-p buffer)
- (not (= id #xffffffff))) ;; TODO #172
- (exwm-workspace-move-window (elt data 0) id))))
+ (not (= workspace #xffffffff))) ;; TODO #172
+ (exwm-workspace-move-window workspace id))))
(defun exwm--on-net-wm-state (id data)
"Handle _NET_WM_STATE message with ID and DATA."
