Commit 883b3490 authored by Michael Albinus's avatar Michael Albinus

* lisp/net/tramp.el (tramp-file-local-name): Remove `save-match-data'.

parent c01f55f1
Pipeline #4504 failed with stage
in 90 minutes
......@@ -1339,14 +1339,14 @@ entry does not exist, return nil."
"Return the local name component of NAME.
This function removes from NAME the specification of the remote
host and the method of accessing the host, leaving only the part
that identifies NAME locally on the remote system. NAME must be
a string that matches `tramp-file-name-regexp'. The returned
file name can be used directly as argument of `process-file',
`start-file-process', or `shell-command'."
(save-match-data
(and (tramp-tramp-file-p name)
(string-match (nth 0 tramp-file-name-structure) name)
(match-string (nth 4 tramp-file-name-structure) name))))
that identifies NAME locally on the remote system. If NAME does
not match `tramp-file-name-regexp', just NAME is returned. The
returned file name can be used directly as argument of
`process-file', `start-file-process', or `shell-command'."
(or (and (tramp-tramp-file-p name)
(string-match (nth 0 tramp-file-name-structure) name)
(match-string (nth 4 tramp-file-name-structure) name))
name))
(defun tramp-find-method (method user host)
"Return the right method string to use depending on USER and HOST.
......
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