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:
Michael Albinus 2024-12-28 15:53:08 +01:00
parent af3bbc8360
commit e32484547d

View file

@ -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.