From: Juri Linkov <juri@linkov.net>
Date: Sun, 11 Sep 2022 08:22:11 +0000 (+0300)
Subject: * lisp/vc/vc.el (vc-diff-patch-string): Fix arg in revert-buffer-function.
X-Git-Tag: emacs-29.0.90~1856^2~610
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8a902013e4d390ec077baff29f96e9fd12e2f392;p=emacs.git

* lisp/vc/vc.el (vc-diff-patch-string): Fix arg in revert-buffer-function.
---

diff --git a/lisp/vc/vc.el b/lisp/vc/vc.el
index c4f0671d643..c75356c4bdf 100644
--- a/lisp/vc/vc.el
+++ b/lisp/vc/vc.el
@@ -1808,7 +1808,8 @@ in the output buffer."
     (setq buffer-read-only t)
     (diff-mode)
     (setq-local diff-vc-backend (vc-responsible-backend default-directory))
-    (setq-local revert-buffer-function (lambda (_ _) (vc-diff-patch-string)))
+    (setq-local revert-buffer-function
+                (lambda (_ _) (vc-diff-patch-string patch-string)))
     (setq-local vc-patch-string patch-string)
     (pop-to-buffer (current-buffer))
     (vc-run-delayed (vc-diff-finish (current-buffer) nil))))