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

* lisp/net/tramp.el: Avoid recursive load of Tramp. (Bug#26943)

Browse source
This commit is contained in:
Michael Albinus 2017-05-16 11:22:33 +02:00
parent 4635016869
commit 014f1cc064
1 changed files with 7 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
lisp/net/tramp.el
View file

@ -2058,8 +2058,14 @@ ARGS are the arguments OPERATION has been called with."
`(let ((debug-on-error tramp-debug-on-error))
(tramp-compat-condition-case-unless-debug ,var ,bodyform ,@handlers)))
;; This is to avoid recursive load.
;;;###autoload(defun tramp-file-name-handler (operation &rest args)
;;;###autoload "Load Tramp file name handler, and perform OPERATION."
;;;###autoload (let ((default-directory temporary-file-directory))
;;;###autoload (load "tramp" nil t))
;;;###autoload (apply operation args))
;; Main function.
;;;###autoload
(defun tramp-file-name-handler (operation &rest args)
"Invoke Tramp file name handler.
Falls back to normal file name handler if no Tramp file name handler exists."