Commit e2396d80 authored by Dan Nicolaescu's avatar Dan Nicolaescu
Browse files

(vc-annotate-revision-at-line): Compare file

names too.
parent 433bdc96
2010-01-25 Dan Nicolaescu <dann@ics.uci.edu>
* vc-annotate.el (vc-annotate-revision-at-line): Compare file
names too.
* vc-bzr.el (vc-bzr-print-log): Use the more compact --line option
for the short log.
(vc-bzr-log-view-mode): Adjust regexp for the above change.
......
......@@ -447,7 +447,8 @@ Return a cons (REV . FILENAME)."
(let ((rev-at-line (vc-annotate-extract-revision-at-line)))
(if (not rev-at-line)
(message "Cannot extract revision number from the current line")
(if (equal (car rev-at-line) vc-annotate-parent-rev)
(if (and (equal (car rev-at-line) vc-annotate-parent-rev)
(string= (cdr rev-at-line) vc-annotate-parent-file))
(message "Already at revision %s" rev-at-line)
(vc-annotate-warp-revision (car rev-at-line) (cdr rev-at-line)))))))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment