Support showing one revision with Mercurial

* lisp/vc/vc-hg.el (vc-hg-print-log): Support 'with-diff'
invocation of "C-1 C-x v L".

diff --git a/lisp/vc/vc-hg.el b/lisp/vc/vc-hg.el
index 5ff1a6204b11dd1645d1bfab7587388592965a0a..c9407b1b597ea34494f017d4dbddacfdfb5739b1 100644 (file)
--- a/lisp/vc/vc-hg.el
+++ b/lisp/vc/vc-hg.el
@@ -432,6 +432,8 @@ If LIMIT is non-nil, show no more than this many entries."
             (nconc
              (when start-revision (list (format "-r%s:0" start-revision)))
              (when limit (list "-l" (format "%s" limit)))
+              (when (eq vc-log-view-type 'with-diff)
+                (list "-p"))
              (if shortlog
                   `(,@(if vc-hg-log-graph '("--graph"))
                     "--template"