procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Support showing one revision with Subversion

Browse source 
* lisp/vc/vc-svn.el (vc-svn-print-log): Support 'with-diff'
invocation of "C-1 C-x v L".
This commit is contained in:
Eli Zaretskii 2019-11-29 12:00:59 +02:00
parent 3fe9d86535
commit 11baa417c5
1 changed files with 6 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
lisp/vc/vc-svn.el
View file

@ -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."