Mercurial > emacs
comparison lisp/vc-annotate.el @ 106157:42f3f64ab6e5
(vc-annotate-show-log-revision-at-line): Pass a
nil LIMIT argument to vc-print-log-internal.
| author | Dan Nicolaescu <dann@ics.uci.edu> |
|---|---|
| date | Fri, 20 Nov 2009 05:44:49 +0000 |
| parents | 6f463ea7a91a |
| children | 456620b3e939 |
comparison
equal
deleted
inserted
replaced
| 106156:cf329ff7daa6 | 106157:42f3f64ab6e5 |
|---|---|
| 485 (message "Cannot be invoked outside of a vc annotate buffer") | 485 (message "Cannot be invoked outside of a vc annotate buffer") |
| 486 (let ((rev-at-line (vc-annotate-extract-revision-at-line))) | 486 (let ((rev-at-line (vc-annotate-extract-revision-at-line))) |
| 487 (if (not rev-at-line) | 487 (if (not rev-at-line) |
| 488 (message "Cannot extract revision number from the current line") | 488 (message "Cannot extract revision number from the current line") |
| 489 (vc-print-log-internal | 489 (vc-print-log-internal |
| 490 vc-annotate-backend (list (cdr rev-at-line)) (car rev-at-line)))))) | 490 vc-annotate-backend (list (cdr rev-at-line)) (car rev-at-line) nil))))) |
| 491 | 491 |
| 492 (defun vc-annotate-show-diff-revision-at-line-internal (filediff) | 492 (defun vc-annotate-show-diff-revision-at-line-internal (filediff) |
| 493 (if (not (equal major-mode 'vc-annotate-mode)) | 493 (if (not (equal major-mode 'vc-annotate-mode)) |
| 494 (message "Cannot be invoked outside of a vc annotate buffer") | 494 (message "Cannot be invoked outside of a vc annotate buffer") |
| 495 (let* ((rev-at-line (vc-annotate-extract-revision-at-line)) | 495 (let* ((rev-at-line (vc-annotate-extract-revision-at-line)) |