From 1524fe427d00c1cf255b9d68cc8565de45ea78df Mon Sep 17 00:00:00 2001 From: Michael Albinus Date: Wed, 23 Nov 2022 12:00:35 +0100 Subject: 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'. --- test/lisp/net/tramp-tests.el | 3 +++ 1 file changed, 3 insertions(+) (limited to 'test/lisp/net') 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))) -- cgit v1.2.3