Function: url-tramp-convert-tramp-to-url
url-tramp-convert-tramp-to-url is a byte-compiled function defined in
url-tramp.el.gz.
Signature
(url-tramp-convert-tramp-to-url FILE)
Documentation
Convert FILE, a Tramp file name, to a URL.
In case FILE is not convertible, nil is returned.
Source Code
;; Defined in /usr/src/emacs/lisp/url/url-tramp.el.gz
(defun url-tramp-convert-tramp-to-url (file)
"Convert FILE, a Tramp file name, to a URL.
In case FILE is not convertible, nil is returned."
(let* ((obj (and (tramp-tramp-file-p file)
(ignore-errors (tramp-dissect-file-name file))))
(port
(and obj (stringp (tramp-file-name-port obj))
(string-to-number (tramp-file-name-port obj)))))
(if (and obj (member (tramp-file-name-method obj) url-tramp-protocols))
(url-recreate-url
(url-parse-make-urlobj
(tramp-file-name-method obj)
(tramp-file-name-user obj)
nil ; password.
(tramp-file-name-host obj)
port
(tramp-file-name-localname obj)
nil nil t)) ; target attributes fullness.
file)))