diff options
| author | Michael Albinus | 2025-10-14 12:58:27 +0200 |
|---|---|---|
| committer | Michael Albinus | 2025-10-14 12:58:27 +0200 |
| commit | 3aae55acfc5b43ebe436dfc57937db217ccc0891 (patch) | |
| tree | 22822edf6dac2c7821478a9ea4178a95795ddd50 | |
| parent | bcc33e300a77750a30ab5d6aa60f1fa101f93501 (diff) | |
| download | emacs-3aae55acfc5b43ebe436dfc57937db217ccc0891.tar.gz emacs-3aae55acfc5b43ebe436dfc57937db217ccc0891.zip | |
Fix Tramp customization
Do not use the ;;;###tramp-autoload cookie for defcustoms. This
damages the customisation when Tramp is autoloaded. Reported by
Joel Reicher <joel.reicher@gmail.com>.
* lisp/net/tramp-cache.el (tramp-verbose): Declare.
(tramp-connection-properties):
* lisp/net/tramp-message.el (tramp-verbose):
Remove ;;;###tramp-autoload cookie.
| -rw-r--r-- | lisp/net/tramp-cache.el | 2 | ||||
| -rw-r--r-- | lisp/net/tramp-message.el | 1 |
2 files changed, 1 insertions, 2 deletions
diff --git a/lisp/net/tramp-cache.el b/lisp/net/tramp-cache.el index eedb5a3e9ba..c8223d859c7 100644 --- a/lisp/net/tramp-cache.el +++ b/lisp/net/tramp-cache.el | |||
| @@ -90,6 +90,7 @@ | |||
| 90 | (require 'time-stamp) | 90 | (require 'time-stamp) |
| 91 | 91 | ||
| 92 | (declare-function tramp-get-method-parameter "tramp") | 92 | (declare-function tramp-get-method-parameter "tramp") |
| 93 | (defvar tramp-verbose) | ||
| 93 | 94 | ||
| 94 | ;;; -- Cache -- | 95 | ;;; -- Cache -- |
| 95 | 96 | ||
| @@ -97,7 +98,6 @@ | |||
| 97 | (defvar tramp-cache-data (make-hash-table :test #'equal) | 98 | (defvar tramp-cache-data (make-hash-table :test #'equal) |
| 98 | "Hash table for remote files properties.") | 99 | "Hash table for remote files properties.") |
| 99 | 100 | ||
| 100 | ;;;###tramp-autoload | ||
| 101 | (defcustom tramp-connection-properties nil | 101 | (defcustom tramp-connection-properties nil |
| 102 | "List of static connection properties. | 102 | "List of static connection properties. |
| 103 | Every entry has the form (REGEXP PROPERTY VALUE). The regexp | 103 | Every entry has the form (REGEXP PROPERTY VALUE). The regexp |
diff --git a/lisp/net/tramp-message.el b/lisp/net/tramp-message.el index a328183e184..d349179d0e6 100644 --- a/lisp/net/tramp-message.el +++ b/lisp/net/tramp-message.el | |||
| @@ -56,7 +56,6 @@ | |||
| 56 | (defvar tramp-repository-branch) | 56 | (defvar tramp-repository-branch) |
| 57 | (defvar tramp-repository-version) | 57 | (defvar tramp-repository-version) |
| 58 | 58 | ||
| 59 | ;;;###tramp-autoload | ||
| 60 | (defcustom tramp-verbose 3 | 59 | (defcustom tramp-verbose 3 |
| 61 | "Verbosity level for Tramp messages. | 60 | "Verbosity level for Tramp messages. |
| 62 | Any level x includes messages for all levels 1 .. x-1. The levels are | 61 | Any level x includes messages for all levels 1 .. x-1. The levels are |