Fix Bug#39279

* lisp/net/tramp.el (tramp-completion-file-name-handler):
Fix thinko.  (Bug#39279)
This commit is contained in:
Michael Albinus 2020-01-25 19:25:00 +01:00
parent 31efd1cea8
commit 5ba6df774e

View file

@ -2412,10 +2412,11 @@ Fall back to normal file name handler if no Tramp file name handler exists."
(defun tramp-completion-file-name-handler (operation &rest args)
"Invoke Tramp file name completion handler for OPERATION and ARGS.
Falls back to normal file name handler if no Tramp file name handler exists."
(when tramp-mode
(if-let ((fn (assoc operation tramp-completion-file-name-handler-alist)))
(save-match-data (apply (cdr fn) args))
(tramp-run-real-handler operation args))))
(if-let
((fn (and tramp-mode
(assoc operation tramp-completion-file-name-handler-alist))))
(save-match-data (apply (cdr fn) args))
(tramp-run-real-handler operation args)))
;;;###autoload
(progn (defun tramp-autoload-file-name-handler (operation &rest args)