* lisp/vc/vc.el (vc-find-revision-no-save): Fix parens (bug#61256).

Move '(setq failed nil)' from UNWINDFORMS of 'unwind-protect' to BODYFORM.
This commit is contained in:
Juri Linkov 2023-02-05 20:23:57 +02:00
parent 948e343496
commit 26e947ccb1

View file

@ -2342,8 +2342,8 @@ Unlike `vc-find-revision-save', doesn't save the buffer to the file."
(ignore-errors (delay-mode-hooks (set-auto-mode))))
(normal-mode))
(set-buffer-modified-p nil)
(setq buffer-read-only t))
(setq failed nil)
(setq buffer-read-only t)
(setq failed nil))
(when (and failed (unless buffer (get-file-buffer filename)))
(with-current-buffer (get-file-buffer filename)
(set-buffer-modified-p nil))