From 9b843f2d1f59dbb9b7565eb7465b80cdc6e97a8a 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. (cherry picked from commit 8f85cf2ae93a089ea78f55915aa5f7c6776d3362) --- 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 c55b268867d..5c61f9b605b 100644 --- a/lisp/vc/vc.el +++ b/lisp/vc/vc.el @@ -1552,8 +1552,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) -- 2.39.5