diff options
| author | Michael Albinus <michael.albinus@gmx.de> | 2020-04-05 18:29:10 +0200 |
|---|---|---|
| committer | Michael Albinus <michael.albinus@gmx.de> | 2020-04-05 18:29:10 +0200 |
| commit | c40b72389e4a807cb1231eb9341fadbd1eca88c5 (patch) | |
| tree | 5166f203768dfb93b122b6a8fa2a9c03bd2b1977 | |
| parent | 333f63d53706de9d1a1dbc04ed62f9dc0e9698db (diff) | |
| download | emacs-c40b72389e4a807cb1231eb9341fadbd1eca88c5.tar.gz | |
Fix thinko in tramp-cache.el
* lisp/net/tramp-cache.el (tramp-set-connection-property)
(tramp-flush-connection-property)
(tramp-flush-connection-properties): Use `tramp-file-name-p'.
| -rw-r--r-- | lisp/net/tramp-cache.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/net/tramp-cache.el b/lisp/net/tramp-cache.el index 93eeb16f547..09e30f000f4 100644 --- a/lisp/net/tramp-cache.el +++ b/lisp/net/tramp-cache.el @@ -339,7 +339,7 @@ Return VALUE." (when-let ((hash (tramp-get-hash-table key))) (puthash property value hash)) (setq tramp-cache-data-changed - (or tramp-cache-data-changed (tramp-tramp-file-p key))) + (or tramp-cache-data-changed (tramp-file-name-p key))) (tramp-message key 7 "%s %s" property value) value) @@ -368,7 +368,7 @@ PROPERTY is set persistent when KEY is a `tramp-file-name' structure." (when-let ((hash (tramp-get-hash-table key))) (remhash property hash)) (setq tramp-cache-data-changed - (or tramp-cache-data-changed (tramp-tramp-file-p key))) + (or tramp-cache-data-changed (tramp-file-name-p key))) (tramp-message key 7 "%s" property)) ;;;###tramp-autoload @@ -388,7 +388,7 @@ used to cache connection properties of the local machine." (when-let ((hash (gethash key tramp-cache-data))) (hash-table-keys hash))) (setq tramp-cache-data-changed - (or tramp-cache-data-changed (tramp-tramp-file-p key))) + (or tramp-cache-data-changed (tramp-file-name-p key))) (remhash key tramp-cache-data)) ;;;###tramp-autoload |