Mirrors/exwm
2
0
Fork 0
mirror of https://github.com/ch11ng/exwm.git synced 2025-04-13 22:54:02 +02:00
Code Issues Projects Releases Packages Wiki Activity

Merge 0683cbf5e2 into 7823eb988c

Browse source
This commit is contained in:
Huang Ying 2018-02-18 06:35:23 +00:00 • committed by GitHub
commit ea3f5a0b42
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
1 changed files with 5 additions and 1 deletions

6
exwm-randr.el
View file

@ -52,6 +52,9 @@
(defvar exwm-randr-workspace-output-plist nil)
(defvar exwm-randr-default-output nil
"Default output to put new workspace on.")
(defvar exwm-randr-refresh-hook nil
"Normal hook run when the RandR module just refreshed.")
@ -100,7 +103,8 @@
;; Not all workspaces are fullscreen; reset this counter.
(setq exwm-workspace--fullscreen-frame-count 0))
(dotimes (i (exwm-workspace--count))
(let* ((output (plist-get exwm-randr-workspace-output-plist i))
(let* ((output (or (plist-get exwm-randr-workspace-output-plist i)
exwm-randr-default-output))
(geometry (lax-plist-get output-plist output))
(frame (elt exwm-workspace--list i)))
(unless geometry