Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-16 17:24:23 +00:00
Code Issues Projects Releases Packages Wiki Activity

vc-revert: Fix calling vc-buffer-sync (bug#79319)

Browse source 
* lisp/vc/vc.el (vc-revert): Don't call vc-buffer-sync on a
non-file-visiting buffer (bug#79319).  Don't try to use memq to
compare strings.
This commit is contained in:
Sean Whitton 2025-08-31 16:37:11 +01:00
parent 11dc1420e4
commit 0cd0aaa14f
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/vc/vc.el
View file

@ -3664,7 +3664,8 @@ to the working revision (except for keyword expansion)."
;; If any of the files is visited by the current buffer, make sure
;; buffer is saved. If the user says `no', abort since we cannot
;; show the changes and ask for confirmation to discard them.
(when (or (not files) (memq (buffer-file-name) files))
(when-let* ((n (buffer-file-name))
((or (not files) (member n files))))
(vc-buffer-sync nil))
(save-some-buffers nil (lambda ()
(and-let* ((n (buffer-file-name)))