From 8f85cf2ae93a089ea78f55915aa5f7c6776d3362 Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Fri, 6 Jun 2025 11:47:10 +0100 Subject: [PATCH] Fix apparent thinko in vc-next-action * lisp/vc/vc.el (vc-next-action): Pass an argument to buffer-modified-p because the loop does not set the current buffer before calling that function. --- lisp/vc/vc.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/vc/vc.el b/lisp/vc/vc.el index f51bd2b85b3..6f7b40ae057 100644 --- a/lisp/vc/vc.el +++ b/lisp/vc/vc.el @@ -1556,8 +1556,8 @@ from which to check out the file(s)." ;; said no to saving it; in that case, don't revert, ;; because the user might intend to save after ;; finishing the log entry and committing. - (not (and visited (buffer-modified-p)))) - (vc-revert-file file) + (not (and visited (buffer-modified-p visited)))) + (vc-revert-file file) (setq ready-for-commit (delete file ready-for-commit)))))) ;; Remaining files need to be committed (if (not ready-for-commit)