* lisp/net/tramp.el (tramp-file-local-name): Remove `save-match-data'.
This commit is contained in:
parent
c01f55f126
commit
883b3490d8
1 changed files with 8 additions and 8 deletions
|
@ -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.
|
||||
|
|
Loading…
Add table
Reference in a new issue