mirror of
https://github.com/emacs-exwm/exwm.git
synced 2024-11-27 06:48:00 +01:00
Expose `exwm-randr-refresh' public interface
* exwm-randr.el (exwm-randr-refresh): New public interface allowing users to manually refresh when RandR settings are changed output EXWM. (exwm-randr--refresh): Made obsolete.
This commit is contained in:
parent
e597ab4f78
commit
9dcfff568f
1 changed files with 6 additions and 1 deletions
|
@ -125,8 +125,10 @@ corresponding monitors whenever the monitors are active.
|
|||
(exwm--log "Monitors: %s" monitor-plist)
|
||||
(list primary-monitor monitor-plist)))
|
||||
|
||||
(defun exwm-randr--refresh ()
|
||||
;;;###autoload
|
||||
(defun exwm-randr-refresh ()
|
||||
"Refresh workspaces according to the updated RandR info."
|
||||
(interactive)
|
||||
(let* ((result (exwm-randr--get-monitors))
|
||||
(primary-monitor (elt result 0))
|
||||
(monitor-plist (elt result 1))
|
||||
|
@ -181,6 +183,9 @@ corresponding monitors whenever the monitors are active.
|
|||
(xcb:flush exwm--connection)
|
||||
(run-hooks 'exwm-randr-refresh-hook))))
|
||||
|
||||
(define-obsolete-function-alias 'exwm-randr--refresh #'exwm-randr-refresh
|
||||
"27.1")
|
||||
|
||||
(defun exwm-randr--on-ScreenChangeNotify (_data _synthetic)
|
||||
(exwm--log)
|
||||
(run-hooks 'exwm-randr-screen-change-hook)
|
||||
|
|
Loading…
Reference in a new issue