Add tramp-archive-local-file-name
* lisp/net/tramp-archive.el (tramp-archive-file-name-p): Add ;;;###tramp-autoload cookie. (tramp-archive-local-file-name): New defun.
This commit is contained in:
parent
af3bbc8360
commit
e32484547d
1 changed files with 6 additions and 0 deletions
|
@ -426,6 +426,7 @@ arguments to pass to the OPERATION."
|
|||
|
||||
;; File name conversions.
|
||||
|
||||
;;;###tramp-autoload
|
||||
(defun tramp-archive-file-name-p (name)
|
||||
"Return t if NAME is a string with archive file name syntax."
|
||||
(and (stringp name)
|
||||
|
@ -581,6 +582,11 @@ offered."
|
|||
"Return NAME in GVFS syntax."
|
||||
(tramp-make-tramp-file-name (tramp-archive-dissect-file-name name)))
|
||||
|
||||
;; This is used in GNU ELPA package tramp-locproc.el.
|
||||
(defun tramp-archive-local-file-name (filename)
|
||||
"Return local mount name of FILENAME."
|
||||
(tramp-gvfs-local-file-name (tramp-archive-gvfs-file-name filename)))
|
||||
|
||||
|
||||
;; File name primitives.
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue