emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 11baa41: Support showing one revision with Subversion


From: Eli Zaretskii
Subject: master 11baa41: Support showing one revision with Subversion
Date: Fri, 29 Nov 2019 05:01:51 -0500 (EST)

branch: master
commit 11baa417c56b42441b7cf9e4092acd840440fe47
Author: Eli Zaretskii <address@hidden>
Commit: Eli Zaretskii <address@hidden>

    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(-)

diff --git a/lisp/vc/vc-svn.el b/lisp/vc/vc-svn.el
index ed34b35..a2081e1 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."



reply via email to

[Prev in Thread] Current Thread [Next in Thread]