Commit 15cc764c authored by Kai Großjohann's avatar Kai Großjohann
Browse files

(tramp-handle-file-remote-p): New implementation to

agree with new return value of `file-remote-p'.
This syncs with Tramp 2.0.42.
parent f3e6add2
2004-06-26 Kai Grossjohann <kai.grossjohann@gmx.net>
* net/tramp.el (tramp-handle-file-remote-p): New implementation to
agree with new return value of `file-remote-p'.
This syncs with Tramp 2.0.42.
* net/ange-ftp.el (ange-ftp-file-remote-p): New return value,
according to new documentation of `file-remote-p'.
......
......@@ -3542,7 +3542,14 @@ This will break if COMMAND prints a newline, followed by the value of
(defun tramp-handle-file-remote-p (filename)
"Like `file-remote-p' for tramp files."
(when (tramp-tramp-file-p filename) t))
(when (tramp-tramp-file-p filename)
(with-parsed-tramp-file-name filename nil
(make-tramp-file-name
:multi-method multi-method
:method method
:user user
:host host
:localname ""))))
(defun tramp-handle-insert-file-contents
(filename &optional visit beg end replace)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment