[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/exwm cb8706f: Delay setting workspaces active/inactive
From: |
Chris Feng |
Subject: |
[elpa] externals/exwm cb8706f: Delay setting workspaces active/inactive |
Date: |
Fri, 9 Mar 2018 11:14:42 -0500 (EST) |
branch: externals/exwm
commit cb8706f91c1c343a9bf392c9deaadc0c42d4dba6
Author: Chris Feng <address@hidden>
Commit: Chris Feng <address@hidden>
Delay setting workspaces active/inactive
* exwm-randr.el (exwm-randr--refresh): Set workspaces active/inactive
after their geometries have been updated.
---
exwm-randr.el | 23 ++++++++++++-----------
1 file changed, 12 insertions(+), 11 deletions(-)
diff --git a/exwm-randr.el b/exwm-randr.el
index 0658bee..b3c6ce8 100644
--- a/exwm-randr.el
+++ b/exwm-randr.el
@@ -140,6 +140,18 @@ the first one in result being the primary output."
container-frame-alist))
(set-frame-parameter frame 'exwm-randr-output output)
(set-frame-parameter frame 'exwm-geometry geometry)))
+ ;; Update workareas.
+ (exwm-workspace--update-workareas)
+ ;; Resize workspace.
+ (dolist (f exwm-workspace--list)
+ (exwm-workspace--set-fullscreen f))
+ (xcb:flush exwm--connection)
+ ;; Raise the minibuffer if it's active.
+ (when (and (active-minibuffer-window)
+ (exwm-workspace--minibuffer-own-frame-p))
+ (exwm-workspace--show-minibuffer))
+ ;; Set _NET_DESKTOP_GEOMETRY.
+ (exwm-workspace--set-desktop-geometry)
;; Update active/inactive workspaces.
(dolist (w exwm-workspace--list)
(exwm-workspace--set-active w nil))
@@ -155,17 +167,6 @@ the first one in result being the primary output."
(rassq-delete-all output container-output-alist))
(exwm-workspace--set-active (cdr (assq xwin container-frame-alist))
t))))
- ;; Update workareas.
- (exwm-workspace--update-workareas)
- ;; Resize workspace.
- (dolist (f exwm-workspace--list)
- (exwm-workspace--set-fullscreen f))
- ;; Raise the minibuffer if it's active.
- (when (and (active-minibuffer-window)
- (exwm-workspace--minibuffer-own-frame-p))
- (exwm-workspace--show-minibuffer))
- ;; Set _NET_DESKTOP_GEOMETRY.
- (exwm-workspace--set-desktop-geometry)
(xcb:flush exwm--connection)
(run-hooks 'exwm-randr-refresh-hook))))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/exwm cb8706f: Delay setting workspaces active/inactive,
Chris Feng <=