* 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 c4f0671d6435269bb124a13244f26e346d9901c2..c75356c4bdff88042cde1f18204bd291a9ef7459 100644 (file)
--- 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))))