diff options
| author | Michael Albinus | 2023-07-08 15:43:21 +0200 |
|---|---|---|
| committer | Michael Albinus | 2023-07-08 15:43:21 +0200 |
| commit | a82486e5a4e1ea3abb5afb6f279b22c44f0218d8 (patch) | |
| tree | bfc170100c027611edb5e3386a580da5cbe64e5a | |
| parent | 600b90ed56854e8460038ca6b8aaa1feae4ab2c9 (diff) | |
| download | emacs-a82486e5a4e1ea3abb5afb6f279b22c44f0218d8.tar.gz emacs-a82486e5a4e1ea3abb5afb6f279b22c44f0218d8.zip | |
Fix stale cache in Tramp (don't merge)
* lisp/net/tramp-sh.el (tramp-do-copy-or-rename-file-directly):
Flush cache in time.
| -rw-r--r-- | lisp/net/tramp-sh.el | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/lisp/net/tramp-sh.el b/lisp/net/tramp-sh.el index 48ba3d09e3e..502040902e1 100644 --- a/lisp/net/tramp-sh.el +++ b/lisp/net/tramp-sh.el | |||
| @@ -2338,6 +2338,11 @@ the uid and gid from FILENAME." | |||
| 2338 | ;; Save exit. | 2338 | ;; Save exit. |
| 2339 | (ignore-errors (delete-file tmpfile))))))))) | 2339 | (ignore-errors (delete-file tmpfile))))))))) |
| 2340 | 2340 | ||
| 2341 | ;; When newname did exist, we have wrong cached values. | ||
| 2342 | (when t2 | ||
| 2343 | (with-parsed-tramp-file-name newname v2 | ||
| 2344 | (tramp-flush-file-properties v2 v2-localname))) | ||
| 2345 | |||
| 2341 | ;; Set the time and mode. Mask possible errors. | 2346 | ;; Set the time and mode. Mask possible errors. |
| 2342 | (ignore-errors | 2347 | (ignore-errors |
| 2343 | (when keep-date | 2348 | (when keep-date |