Adapt dynamic workspace for RandR module
* exwm-workspace.el (exwm-workspace-list-change-hook): New hook run when the workspace list is modified. * exwm-randr.el (exwm-randr--init, exwm-randr--exit): * exwm-workspace.el (exwm-workspace-swap, exwm-workspace-move) (exwm-workspace--add-frame-as-workspace) (exwm-workspace--remove-frame-as-workspace): Use it.
This commit is contained in:
parent
4c9afc25b3
commit
2ebeec1257
2 changed files with 15 additions and 6 deletions
|
|
@ -154,10 +154,12 @@
|
|||
;; xcb:randr:NotifyMask:OutputProperty
|
||||
;; xcb:randr:NotifyMask:CrtcChange))
|
||||
))
|
||||
(xcb:flush exwm--connection)))))
|
||||
(xcb:flush exwm--connection)
|
||||
(add-hook 'exwm-workspace-list-change-hook #'exwm-randr--refresh)))))
|
||||
|
||||
(defun exwm-randr--exit ()
|
||||
"Exit the RandR module.")
|
||||
"Exit the RandR module."
|
||||
(remove-hook 'exwm-workspace-list-change-hook #'exwm-randr--refresh))
|
||||
|
||||
(defun exwm-randr-enable ()
|
||||
"Enable RandR support for EXWM."
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue