martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Backport: * lisp/net/tramp-archive.el (tramp-archive-autoload-file-name-handler): Scope

Browse Source 
Fix the scoping of `tramp-archive-enabled`.

(cherry picked from commit 8d53c23f90)
This commit is contained in:
Stefan Monnier
2021-10-06 12:15:26 -04:00
committed by Michael Albinus
parent 160e62a23c
commit b7a10b44ac
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/net/tramp-archive.el
View File

@@ -353,6 +353,7 @@ arguments to pass to the OPERATION."
;;;###autoload
(progn (defun tramp-archive-autoload-file-name-handler (operation &rest args)
"Load Tramp archive file name handler, and perform OPERATION."
(defvar tramp-archive-autoload)
(when tramp-archive-enabled
;; We cannot use `tramp-compat-temporary-file-directory' here due
;; to autoload. When installing Tramp's GNU ELPA package, there
@@ -360,7 +361,6 @@ arguments to pass to the OPERATION."
;; overload this.
(let ((default-directory temporary-file-directory)
(tramp-archive-autoload t))
tramp-archive-autoload ; Silence byte compiler.
(apply #'tramp-autoload-file-name-handler operation args)))))
;;;###autoload