summaryrefslogtreecommitdiff
path: root/lisp/net/tramp-sh.el
diff options
context:
space:
mode:
authorMichael Albinus <michael.albinus@gmx.de>2022-12-15 16:37:16 +0100
committerMichael Albinus <michael.albinus@gmx.de>2022-12-15 16:37:16 +0100
commitbb27be36ddfd753a8f78e638f23cc782c7b2c3de (patch)
tree142530fdae2aa04acfc9ffcb9ee0230d4b2f6583 /lisp/net/tramp-sh.el
parentd4c2aa4f913d07d627296c3e96125c4a8c143bd7 (diff)
downloademacs-bb27be36ddfd753a8f78e638f23cc782c7b2c3de.tar.gz
Fix bug#60060 in Tramp
* lisp/net/tramp-sh.el (tramp-sh-handle-file-local-copy): Delete `tmpfile' in case of error. (Bug#60060)
Diffstat (limited to 'lisp/net/tramp-sh.el')
-rw-r--r--lisp/net/tramp-sh.el1
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/net/tramp-sh.el b/lisp/net/tramp-sh.el
index df5800f4e9d..6087f16431e 100644
--- a/lisp/net/tramp-sh.el
+++ b/lisp/net/tramp-sh.el
@@ -3431,6 +3431,7 @@ implementation will be used."
(signal (car err) (cdr err)))))
;; Impossible to copy. Trigger `file-missing' error.
+ (delete-file tmpfile)
(setq tmpfile nil))))
(defun tramp-sh-handle-write-region