Mercurial > emacs
comparison lisp/vc-svn.el @ 106846:f243845df25f
(vc-svn-print-log): Use --limit rather than -l since the
former seems to be more widely accepted by various svn versions.
author | Glenn Morris <rgm@gnu.org> |
---|---|
date | Thu, 14 Jan 2010 19:54:36 -0800 |
parents | 1d1d5d9bd884 |
children | e59c65208b1c |
comparison
equal
deleted
inserted
replaced
106845:eb0820fd350a | 106846:f243845df25f |
---|---|
485 ;; By default Subversion only shows the log up to the | 485 ;; By default Subversion only shows the log up to the |
486 ;; working revision, whereas we also want the log of the | 486 ;; working revision, whereas we also want the log of the |
487 ;; subsequent commits. At least that's what the | 487 ;; subsequent commits. At least that's what the |
488 ;; vc-cvs.el code does. | 488 ;; vc-cvs.el code does. |
489 "-rHEAD:0")) | 489 "-rHEAD:0")) |
490 (when limit (list "-l" (format "%s" limit)))))) | 490 (when limit (list "--limit" (format "%s" limit)))))) |
491 ;; Dump log for the entire directory. | 491 ;; Dump log for the entire directory. |
492 (apply 'vc-svn-command buffer 0 nil "log" | 492 (apply 'vc-svn-command buffer 0 nil "log" |
493 (append | 493 (append |
494 (list | 494 (list |
495 (if start-revision (format "-r%s" start-revision) "-rHEAD:0")) | 495 (if start-revision (format "-r%s" start-revision) "-rHEAD:0")) |
496 (when limit (list "-l" (format "%s" limit))))))))) | 496 (when limit (list "--limit" (format "%s" limit))))))))) |
497 | 497 |
498 (defun vc-svn-diff (files &optional oldvers newvers buffer) | 498 (defun vc-svn-diff (files &optional oldvers newvers buffer) |
499 "Get a difference report using SVN between two revisions of fileset FILES." | 499 "Get a difference report using SVN between two revisions of fileset FILES." |
500 (and oldvers | 500 (and oldvers |
501 (not newvers) | 501 (not newvers) |