[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/exwm feebdf827b 5/6: Merge branch 'mgi.github.com/mgi/f
From: |
ELPA Syncer |
Subject: |
[elpa] externals/exwm feebdf827b 5/6: Merge branch 'mgi.github.com/mgi/fix' into externals/exwm |
Date: |
Fri, 4 Nov 2022 18:57:40 -0400 (EDT) |
branch: externals/exwm
commit feebdf827b98b53d7ea8045de3446757e0fe7e36
Merge: 4c0b9bb5c2 ce2191c444
Author: Adrián Medraño Calvo <adrian@medranocalvo.com>
Commit: Adrián Medraño Calvo <adrian@medranocalvo.com>
Merge branch 'mgi.github.com/mgi/fix' into externals/exwm
---
exwm.el | 13 +++++++++----
1 file changed, 9 insertions(+), 4 deletions(-)
diff --git a/exwm.el b/exwm.el
index b025f6b49a..1bfeb3638a 100644
--- a/exwm.el
+++ b/exwm.el
@@ -420,8 +420,8 @@
(setq type (slot-value obj 'type)
id (slot-value obj 'window)
data (slot-value (slot-value obj 'data) 'data32))
- (exwm--log "atom=%s(%s)" (x-get-atom-name type exwm-workspace--current)
- type)
+ (exwm--log "atom=%s(%s) id=#x%x data=%s" (x-get-atom-name type
exwm-workspace--current)
+ type (or id 0) data)
(cond
;; _NET_NUMBER_OF_DESKTOPS.
((= type xcb:Atom:_NET_NUMBER_OF_DESKTOPS)
@@ -443,7 +443,8 @@
((= type xcb:Atom:_NET_ACTIVE_WINDOW)
(let ((buffer (exwm--id->buffer id))
iconic window)
- (when (buffer-live-p buffer)
+ (if (buffer-live-p buffer)
+ ;; Either an `exwm-mode' buffer (an X window) or a floating frame.
(with-current-buffer buffer
(when (eq exwm--frame exwm-workspace--current)
(if exwm--floating-frame
@@ -457,7 +458,11 @@
(setq window (get-buffer-window nil t))
(when (or iconic
(not (eq window (selected-window))))
- (select-window window))))))))
+ (select-window window)))))
+ ;; A workspace.
+ (dolist (f exwm-workspace--list)
+ (when (eq id (frame-parameter f 'exwm-outer-id))
+ (x-focus-frame f t))))))
;; _NET_CLOSE_WINDOW.
((= type xcb:Atom:_NET_CLOSE_WINDOW)
(let ((buffer (exwm--id->buffer id)))
- [elpa] externals/exwm updated (e43bd78258 -> e8e4a66094), ELPA Syncer, 2022/11/04
- [elpa] externals/exwm e042832b2b 1/6: Hide tab-bar on floating windows, ELPA Syncer, 2022/11/04
- [elpa] externals/exwm ce2191c444 2/6: Focus workspace frames upon _NET_ACTIVE_WINDOW, ELPA Syncer, 2022/11/04
- [elpa] externals/exwm e8e4a66094 6/6: Merge branch 'j4m3s-s.github.com/master' into externals/exwm, ELPA Syncer, 2022/11/04
- [elpa] externals/exwm 0a2c03ed59 4/6: Fix logging order in exwm-workspace--set-active, ELPA Syncer, 2022/11/04
- [elpa] externals/exwm 4c0b9bb5c2 3/6: Merge branch 'stebalien.github.com/fix/hide-floating-tabs' into externals/exwm, ELPA Syncer, 2022/11/04
- [elpa] externals/exwm feebdf827b 5/6: Merge branch 'mgi.github.com/mgi/fix' into externals/exwm,
ELPA Syncer <=