From 8d53c23f90aab6e527c61137ae43274c7a36eca7 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Wed, 6 Oct 2021 12:15:26 -0400 Subject: [PATCH] * lisp/net/tramp-archive.el (tramp-archive-autoload-file-name-handler): Scope Fix the scoping of `tramp-archive-enabled`. --- lisp/net/tramp-archive.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/net/tramp-archive.el b/lisp/net/tramp-archive.el index b28235924de..8bf25151dfb 100644 --- a/lisp/net/tramp-archive.el +++ b/lisp/net/tramp-archive.el @@ -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 -- 2.39.5