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.
This commit is contained in:
Sean Whitton 2025-06-06 11:47:10 +01:00
parent ac4869c712
commit 8f85cf2ae9

View file

@ -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)