maurice/snix
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Use the 'exwm-randr-output' frame parameter to determine the output

Browse source 
* exwm-randr.el (exwm-randr--refresh): Always set the name of primary
output.

* exwm-workspace.el (exwm-workspace-switch)
(exwm-workspace-move-window): Use 'exwm-randr-output' frame parameter
to check if two frames are on the same output.
This commit is contained in:
Chris Feng 2018-02-20 22:17:22 +08:00
parent bfa35c0e38
commit c821f76dfe
2 changed files with 35 additions and 42 deletions
Download patch file Download diff file Expand all files Collapse all files

9
exwm-randr.el
View file

@ -89,7 +89,7 @@ the first one in result being the primary output."
(defun exwm-randr--refresh ()
"Refresh workspaces according to the updated RandR info."
(let (output-name geometry output-plist default-geometry)
(let (output-name geometry output-plist primary-output default-geometry)
;; Query all outputs
(with-slots (config-timestamp outputs)
(xcb:+request-unchecked+reply exwm--connection
@ -115,8 +115,9 @@ the first one in result being the primary output."
:x x :y y
:width width :height height)
output-plist (plist-put output-plist output-name geometry))
(unless default-geometry ;assume the first output as primary
(setq default-geometry geometry)))))))
(unless primary-output
(setq primary-output output-name
default-geometry geometry)))))))
(exwm--log "(randr) outputs: %s" output-plist)
(when output-plist
(when exwm-workspace--fullscreen-frame-count
@ -128,7 +129,7 @@ the first one in result being the primary output."
(frame (elt exwm-workspace--list i)))
(unless geometry
(setq geometry default-geometry
output nil))
output primary-output))
(set-frame-parameter frame 'exwm-randr-output output)
(set-frame-parameter frame 'exwm-geometry geometry)))
;; Update workareas.