about summary refs log tree commit diff
path: root/exwm-randr.el
diff options
context:
space:
mode:
authorChris Feng <chris.w.feng@gmail.com>2018-11-11T00·00+0000
committerChris Feng <chris.w.feng@gmail.com>2018-11-11T00·00+0000
commit9dcfff568f8c1205bf57877e3d1d5ebe8466ce8d (patch)
tree6e4b92d53d13566b5f0789b5a947adf514e3e1ca /exwm-randr.el
parente597ab4f785982d44f56f61ba113b54c501256ac (diff)
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.
Diffstat (limited to 'exwm-randr.el')
-rw-r--r--exwm-randr.el7
1 files changed, 6 insertions, 1 deletions
diff --git a/exwm-randr.el b/exwm-randr.el
index 542225265221..2ec478973036 100644
--- a/exwm-randr.el
+++ b/exwm-randr.el
@@ -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)