* lisp/net/tramp.el (tramp-file-name-handler): Use autoload-do-load

This commit is contained in:
Stefan Monnier 2019-06-25 16:09:48 -04:00
parent 0ab24743f1
commit 93b823b6e4

View file

@ -2317,10 +2317,14 @@ Falls back to normal file name handler if no Tramp file name handler exists."
;; in recursive loading. Therefore, we load
;; the Tramp packages locally.
(when (autoloadp sf)
;; FIXME: Not clear why we need these bindings here.
;; The explanation above is not convincing and
;; the bug#9114 for which it was added doesn't
;; clarify the core of the problem.
(let ((default-directory
(tramp-compat-temporary-file-directory))
file-name-handler-alist)
(load (cadr sf) 'noerror 'nomessage)))
(autoload-do-load sf foreign)))
;; (tramp-message
;; v 4 "Running `%s'..." (cons operation args))
;; If `non-essential' is non-nil, Tramp shall