diff options
| author | Dan Nicolaescu <dann@ics.uci.edu> | 2009-12-07 09:02:11 +0000 |
|---|---|---|
| committer | Dan Nicolaescu <dann@ics.uci.edu> | 2009-12-07 09:02:11 +0000 |
| commit | 5d72174c3f49ee162896bf3c71395657ad1a9942 (patch) | |
| tree | 4e972ee200ef874adba95487f9d429a627a77c9c /lisp/vc-rcs.el | |
| parent | ddbd9009ee8a10a1b6eecce38d42427aef1fd72f (diff) | |
| download | emacs-5d72174c3f49ee162896bf3c71395657ad1a9942.tar.gz | |
Support showing a single log entry from vc-annotate.
* vc.el (print-log): Add a new argument: START-REVISION.
(vc-print-log-internal): Add a new optional argument and
pass it to the backend.
(vc-print-log, vc-print-root-log): Adjust callers.
* vc-annotate.el (vc-annotate-show-log-revision-at-line): If a
buffer already displays the requested log entry, use it.
Otherwise display only the log entry in question.
* vc-svn.el (vc-svn-print-log):
* vc-mtn.el (log-view-file-re):
* vc-hg.el (vc-hg-state):
* vc-git.el (vc-git-print-log): Add support for new argument START-REVISION.
(vc-git-show-log-entry): Return t on success.
* vc-bzr.el (vc-bzr-print-log): Add support new argument START-REVISION.
(vc-bzr-show-log-entry): Return t on success.
* vc-rcs.el (vc-rcs-print-log):
* vc-sccs.el (vc-sccs-print-log):
* vc-cvs.el (vc-cvs-print-log): Add new argument, ignore it.
Diffstat (limited to 'lisp/vc-rcs.el')
| -rw-r--r-- | lisp/vc-rcs.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/vc-rcs.el b/lisp/vc-rcs.el index 38573e412d9..e5b624db945 100644 --- a/lisp/vc-rcs.el +++ b/lisp/vc-rcs.el @@ -559,7 +559,7 @@ directory the operation is applied to all registered files beneath it." (when (looking-at "[\b\t\n\v\f\r ]+") (delete-char (- (match-end 0) (match-beginning 0)))))) -(defun vc-rcs-print-log (files buffer &optional shortlog limit) +(defun vc-rcs-print-log (files buffer &optional shortlog start-revision-ignored limit) "Get change log associated with FILE. If FILE is a directory the operation is applied to all registered files beneath it." (vc-do-command (or buffer "*vc*") 0 "rlog" (mapcar 'vc-name (vc-expand-dirs files))) |