diff options
| author | Michael Albinus <michael.albinus@gmx.de> | 2022-11-23 12:00:35 +0100 |
|---|---|---|
| committer | Michael Albinus <michael.albinus@gmx.de> | 2022-11-23 12:00:35 +0100 |
| commit | 1524fe427d00c1cf255b9d68cc8565de45ea78df (patch) | |
| tree | 0559c302fe9656af628a933f2402f7ffe00b6824 /test/lisp/net/tramp-tests.el | |
| parent | 9f4306cd8d086745750769d612df3f71defeea1e (diff) | |
| download | emacs-1524fe427d00c1cf255b9d68cc8565de45ea78df.tar.gz | |
Restore tramp-achive's Emacs 26 compatibility
* lisp/net/tramp-archive.el (tramp-archive-autoload-file-name-regexp):
Special handling of Emacs 26. Simplify the other part.
* test/lisp/net/tramp-tests.el (tramp-test48-unload): Special case
of `tramp-register-archive-file-name-handler'.
Diffstat (limited to 'test/lisp/net/tramp-tests.el')
| -rw-r--r-- | test/lisp/net/tramp-tests.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/test/lisp/net/tramp-tests.el b/test/lisp/net/tramp-tests.el index a5bae46a583..a79c47be723 100644 --- a/test/lisp/net/tramp-tests.el +++ b/test/lisp/net/tramp-tests.el @@ -7630,6 +7630,9 @@ Since it unloads Tramp, it shall be the last test to run." (string-prefix-p "tramp" (symbol-name x)) ;; `tramp-completion-mode' is autoloaded in Emacs < 28.1. (not (eq 'tramp-completion-mode x)) + ;; `tramp-register-archive-file-name-handler' is autoloaded + ;; in Emacs < 29.1. + (not (eq 'tramp-register-archive-file-name-handler x)) (not (string-match-p (rx bol "tramp" (? "-archive") (** 1 2 "-") "test") (symbol-name x))) |