procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix warning in tramp-register-archive-autoload-file-name-handler

Browse source 
* lisp/net/tramp-archive.el
(tramp-register-archive-autoload-file-name-handler): Do not use
read syntax #' for `tramp-archive-file-name-handler', it isn't
autoloaded.
This commit is contained in:
Michael Albinus 2024-02-10 09:50:12 +01:00
parent 59b849d1ea
commit 55aea79676
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/net/tramp-archive.el
View file

@ -387,9 +387,11 @@ arguments to pass to the OPERATION."
;;;###autoload
(progn (defun tramp-register-archive-autoload-file-name-handler ()
"Add archive file name handler to `file-name-handler-alist'."
;; Do not use read syntax #' for `tramp-archive-file-name-handler', it
;; isn't autoloaded.
(when (and tramp-archive-enabled
(not
(rassq #'tramp-archive-file-name-handler file-name-handler-alist)))
(rassq 'tramp-archive-file-name-handler file-name-handler-alist)))
(add-to-list 'file-name-handler-alist
(cons (tramp-archive-autoload-file-name-regexp)
#'tramp-archive-autoload-file-name-handler))