emacs-31 8e70e6d687b: * lisp/vc/vc.el (vc-delete-file): Don't backup backup files.
Sean Whitton <[email protected]> Fri, 31 Jul 2026 06:41:49 -0400 (EDT)
| Newsgroups | gmane.emacs.diffs |
|---|---|
| Message-ID | <[email protected]> |
branch: emacs-31 commit 8e70e6d687b5ea1aabdace6a6b8fee7e60117513 Author: Charles A. Roelli <[email protected]> Commit: Sean Whitton <[email protected]> * lisp/vc/vc.el (vc-delete-file): Don't backup backup files. --- lisp/vc/vc.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/vc/vc.el b/lisp/vc/vc.el index c33aae6ce4f..2e0e18500b5 100644 --- a/lisp/vc/vc.el +++ b/lisp/vc/vc.el @@ -5181,7 +5181,9 @@ These are recursively deleted." (backend (if (file-directory-p file) (vc-responsible-backend file) (vc-backend file)))) - (unless (or (file-directory-p file) (null make-backup-files) + (unless (or (file-directory-p file) + (null make-backup-files) + (backup-file-name-p file) (not (file-exists-p file))) (with-current-buffer (or buf (find-file-noselect file)) (let ((backup-inhibited nil))