Refresh workspaces when the monitor/workspace mapping changes

Stebalien · Stebalien · commit a2a977365c0b · 2024-12-31T15:05:10.000Z
Also improve documentation. Fixes #96. * exwm-randr.el (exwm-randr--connection): Move mode declaration up. (exwm-randr-workspace-monitor-plist): Call exwm-randr-refresh if exwm-randr-mode is currently enabled and document the need to exwm-randr-mode whenever this variable is changed.
diff --git a/exwm-randr.el b/exwm-randr.el
@@ -57,6 +57,8 @@
   "RandR."
   :group 'exwm)
 
+(defvar exwm-randr--connection nil "The X connection.")
+
 (defcustom exwm-randr-refresh-hook nil
   "Normal hook run when the RandR module just refreshed."
   :type 'hook)
@@ -86,8 +88,18 @@ setting workspace other than 1 and 3 would always be displayed on the
 primary monitor where workspace 1 and 3 would be displayed on their
 corresponding monitors whenever the monitors are active.
 
+Changes to this variable only take immediate affect when set before
+`exwm-randr-mode' is enabled, via `setopt', or when customized (see the
+Info node `Customization'). Otherwise, the `exwm-randr-refresh' must be
+called explicitly to assign the correct workspaces to the correct monitors.
+
   \\='(1 \"HDMI-1\" 3 \"DP-1\")"
-  :type '(plist :key-type integer :value-type string))
+  :type '(plist :key-type integer :value-type string)
+  :initialize 'custom-initialize-changed
+  :set (lambda (symbol value)
+         (set-default-toplevel-value symbol value)
+         (when exwm-randr--connection
+           (exwm-randr-refresh))))
 
 (defvar exwm-randr--connection nil "The X connection.")
 
