diff options
| author | Sean Whitton | 2025-10-16 16:56:00 +0100 |
|---|---|---|
| committer | Sean Whitton | 2025-10-16 16:56:00 +0100 |
| commit | f36ed942b1971e99ed344e3ed7501638a7cb7610 (patch) | |
| tree | 34ab3bea4da6cc80e02cbd079074dfe22f78d882 | |
| parent | 8aeb4f82d915c6f7b552347ed93ed21d93afae07 (diff) | |
| download | emacs-f36ed942b1971e99ed344e3ed7501638a7cb7610.tar.gz emacs-f36ed942b1971e99ed344e3ed7501638a7cb7610.zip | |
autorevert: Use defvar-local for the -mode variables
* lisp/autorevert.el (auto-revert-mode, auto-revert-tail-mode):
Use defvar-local not defvar. New comment explaining why these
duplicate definitions of the variables are present.
| -rw-r--r-- | lisp/autorevert.el | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/lisp/autorevert.el b/lisp/autorevert.el index ccedaa759cb..3bb40c13b4d 100644 --- a/lisp/autorevert.el +++ b/lisp/autorevert.el | |||
| @@ -126,12 +126,16 @@ Global Auto-Revert Mode does so in all buffers." | |||
| 126 | 126 | ||
| 127 | ;; Variables: | 127 | ;; Variables: |
| 128 | 128 | ||
| 129 | (defvar auto-revert-mode nil | 129 | ;; These two variables are defined here in addition to within the |
| 130 | ;; `define-minor-mode' forms below because the modes are mutually | ||
| 131 | ;; self-referential. | ||
| 132 | |||
| 133 | (defvar-local auto-revert-mode nil | ||
| 130 | "Non-nil when Auto-Revert Mode is active. | 134 | "Non-nil when Auto-Revert Mode is active. |
| 131 | Never set this variable directly, use the command `auto-revert-mode' instead.") | 135 | Never set this variable directly, use the command `auto-revert-mode' instead.") |
| 132 | (put 'auto-revert-mode 'permanent-local t) | 136 | (put 'auto-revert-mode 'permanent-local t) |
| 133 | 137 | ||
| 134 | (defvar auto-revert-tail-mode nil | 138 | (defvar-local auto-revert-tail-mode nil |
| 135 | "Non-nil when Auto-Revert Tail Mode is active. | 139 | "Non-nil when Auto-Revert Tail Mode is active. |
| 136 | Never set this variable directly, use the command | 140 | Never set this variable directly, use the command |
| 137 | `auto-revert-tail-mode' instead.") | 141 | `auto-revert-tail-mode' instead.") |