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

* vc.el (vc-log-show-limit): New variable.

Browse source 
(vc-print-log, vc-print-root-log): Add new argument LIMIT.  Set it
when using a prefix argument.
(vc-print-log-internal): Add new argument LIMIT.

* vc-svn.el (vc-svn-print-log):
* vc-mtn.el (vc-mtn-print-log):
* vc-hg.el (vc-hg-print-log):
* vc-bzr.el (vc-bzr-print-log): Add new optional argument LIMIT,
pass it to the log command when set. Make the BUFFER argument
non-optional.

* vc-sccs.el (vc-sccs-print-log):
* vc-rcs.el (vc-rcs-print-log):
* vc-git.el (vc-git-print-log):
* vc-cvs.el (vc-cvs-print-log): Add new optional argument LIMIT,
ignore it.  Make the BUFFER argument non-optional
This commit is contained in:
Dan Nicolaescu 2009-11-15 20:28:58 +00:00
parent f8e6526707
commit 6616006b02
10 changed files with 85 additions and 34 deletions
Download patch file Download diff file Expand all files Collapse all files

11
lisp/vc-svn.el
View file

@ -462,7 +462,7 @@ or svn+ssh://."
(require 'add-log)
(set (make-local-variable 'log-view-per-file-logs) nil))
(defun vc-svn-print-log (files &optional buffer shortlog)
(defun vc-svn-print-log (files buffer &optional shortlog limit)
"Get change log(s) associated with FILES."
(save-current-buffer
(vc-setup-buffer buffer)
@ -471,7 +471,8 @@ or svn+ssh://."
(if files
(dolist (file files)
(insert "Working file: " file "\n")
(vc-svn-command
(apply
'vc-svn-command
buffer
'async
;; (if (and (= (length files) 1) (vc-stay-local-p file 'SVN)) 'async 0)
@ -481,9 +482,11 @@ or svn+ssh://."
;; working revision, whereas we also want the log of the
;; subsequent commits. At least that's what the
;; vc-cvs.el code does.
"-rHEAD:0"))
"-rHEAD:0"
(when limit (list "-l" (format "%s" limit)))))
;; Dump log for the entire directory.
(vc-svn-command buffer 0 nil "log" "-rHEAD:0")))))
(apply vc-svn-command buffer 0 nil "log" "-rHEAD:0"
(when limit (list "-l" (format "%s" limit))))))))
(defun vc-svn-diff (files &optional oldvers newvers buffer)
"Get a difference report using SVN between two revisions of fileset FILES."