summaryrefslogtreecommitdiff
path: root/lisp/net/tramp-cache.el
diff options
context:
space:
mode:
authorMichael Albinus <michael.albinus@gmx.de>2021-05-22 17:51:07 +0200
committerMichael Albinus <michael.albinus@gmx.de>2021-05-22 17:51:07 +0200
commit4db69b32b835a833168982b0f11a43d7f62ba8b2 (patch)
treee419e64ea235d6b698974cd59d53f2db1e60dd29 /lisp/net/tramp-cache.el
parent84e207c81187ff46fb94775ccb24d9b76b80db9c (diff)
downloademacs-4db69b32b835a833168982b0f11a43d7f62ba8b2.tar.gz
emacs-4db69b32b835a833168982b0f11a43d7f62ba8b2.tar.bz2
emacs-4db69b32b835a833168982b0f11a43d7f62ba8b2.zip
Fix bug#48476
* lisp/net/tramp-archive.el (tramp-archive-autoload-file-name-handler): Add implementation. * lisp/net/tramp-integration.el (tramp-rename-files) (tramp-rename-these-files): Declare them. * lisp/net/tramp.el (tramp-autoload-file-name-handler): Load tramp-archive.el if needed. (Bug#48476) * test/lisp/net/tramp-archive-tests.el (tramp-archive-test45-auto-load): Extend test. Use #' syntax for function symbols.
Diffstat (limited to 'lisp/net/tramp-cache.el')
-rw-r--r--lisp/net/tramp-cache.el3
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/net/tramp-cache.el b/lisp/net/tramp-cache.el
index 2fcb7b11e8d..fdde7fbe44e 100644
--- a/lisp/net/tramp-cache.el
+++ b/lisp/net/tramp-cache.el
@@ -237,8 +237,7 @@ Return VALUE."
;;;###tramp-autoload
(defun tramp-flush-file-properties (key file)
"Remove all properties of FILE in the cache context of KEY."
- (let* ((file (tramp-run-real-handler
- #'directory-file-name (list file)))
+ (let* ((file (tramp-run-real-handler #'directory-file-name (list file)))
(truename (tramp-get-file-property key file "file-truename" nil)))
;; Unify localname. Remove hop from `tramp-file-name' structure.
(setq file (tramp-compat-file-name-unquote file)