forked from Github/emacs
Improve ange-ftp-file-remote-p
* lisp/net/ange-ftp.el (ange-ftp-file-remote-p): Handle hop identification.
This commit is contained in:
parent
778a1ee35b
commit
f6476f8536
1 changed files with 1 additions and 0 deletions
|
|
@ -4242,6 +4242,7 @@ directory, so that Emacs will know its current contents."
|
||||||
((eq identification 'user) user)
|
((eq identification 'user) user)
|
||||||
((eq identification 'host) host)
|
((eq identification 'host) host)
|
||||||
((eq identification 'localname) localname)
|
((eq identification 'localname) localname)
|
||||||
|
((eq identification 'hop) nil)
|
||||||
(t (ange-ftp-replace-name-component file ""))))))
|
(t (ange-ftp-replace-name-component file ""))))))
|
||||||
|
|
||||||
(defun ange-ftp-load (file &optional noerror nomessage nosuffix must-suffix)
|
(defun ange-ftp-load (file &optional noerror nomessage nosuffix must-suffix)
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue