diff options
author | Michael Albinus <michael.albinus@gmx.de> | 2022-12-15 16:37:16 +0100 |
---|---|---|
committer | Michael Albinus <michael.albinus@gmx.de> | 2022-12-15 16:37:16 +0100 |
commit | bb27be36ddfd753a8f78e638f23cc782c7b2c3de (patch) | |
tree | 142530fdae2aa04acfc9ffcb9ee0230d4b2f6583 /lisp/net | |
parent | d4c2aa4f913d07d627296c3e96125c4a8c143bd7 (diff) | |
download | emacs-bb27be36ddfd753a8f78e638f23cc782c7b2c3de.tar.gz emacs-bb27be36ddfd753a8f78e638f23cc782c7b2c3de.tar.bz2 emacs-bb27be36ddfd753a8f78e638f23cc782c7b2c3de.zip |
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')
-rw-r--r-- | lisp/net/tramp-sh.el | 1 |
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 |