From a2d4034242fc6289f73b16e343d850941c3e882c Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Tue, 9 Sep 2025 14:48:27 +0100 Subject: [PATCH] ; * lisp/vc/vc-hg.el (vc-hg-diff): Pass `Hg' to vc-working-revision. --- lisp/vc/vc-hg.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/vc/vc-hg.el b/lisp/vc/vc-hg.el index 2d633e07c1d..5c9df6bf287 100644 --- a/lisp/vc/vc-hg.el +++ b/lisp/vc/vc-hg.el @@ -556,7 +556,7 @@ This requires hg 4.4 or later, for the \"-L\" option of \"hg log\"." (defun vc-hg-diff (files &optional oldvers newvers buffer async) "Get a difference report using hg between two revisions of FILES." (let* ((firstfile (car files)) - (working (and firstfile (vc-working-revision firstfile)))) + (working (and firstfile (vc-working-revision firstfile 'Hg)))) (when (and (not newvers) (equal oldvers working)) (setq oldvers nil)) (when (and newvers (not oldvers))