From 11baa417c56b42441b7cf9e4092acd840440fe47 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Fri, 29 Nov 2019 12:00:59 +0200 Subject: Support showing one revision with Subversion * lisp/vc/vc-svn.el (vc-svn-print-log): Support 'with-diff' invocation of "C-1 C-x v L". --- lisp/vc/vc-svn.el | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) (limited to 'lisp') diff --git a/lisp/vc/vc-svn.el b/lisp/vc/vc-svn.el index ed34b357f9b..a2081e1ab9e 100644 --- a/lisp/vc/vc-svn.el +++ b/lisp/vc/vc-svn.el @@ -579,13 +579,17 @@ If LIMIT is non-nil, show no more than this many entries." ;; subsequent commits. At least that's what the ;; vc-cvs.el code does. "-rHEAD:0")) - (when limit (list "--limit" (format "%s" limit)))))) + (if (eq vc-log-view-type 'with-diff) + (list "--diff")) + (when limit (list "--limit" (format "%s" limit)))))) ;; Dump log for the entire directory. (apply 'vc-svn-command buffer 0 nil "log" (append (list (if start-revision (format "-r%s" start-revision) "-rHEAD:0")) - (when limit (list "--limit" (format "%s" limit))))))))) + (if (eq vc-log-view-type 'with-diff) + (list "--diff")) + (when limit (list "--limit" (format "%s" limit))))))))) (defun vc-svn-diff (files &optional oldvers newvers buffer async) "Get a difference report using SVN between two revisions of fileset FILES." -- cgit v1.2.1