aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorDan Nicolaescu2010-06-21 19:08:55 -0700
committerDan Nicolaescu2010-06-21 19:08:55 -0700
commitc4786d60fecb2fa6a8a7c7785032ebefddc974a8 (patch)
treed9960d668bea06cc9abb8c44ab5f2afefd3b0fa9 /lisp
parent04ec0963f662150746408ff3f9c085240f83bb54 (diff)
downloademacs-c4786d60fecb2fa6a8a7c7785032ebefddc974a8.tar.gz
emacs-c4786d60fecb2fa6a8a7c7785032ebefddc974a8.zip
Fix vc-annotate-show-changeset-diff-revision-at-line for git.
* lisp/vc-annotate.el (vc-annotate-show-diff-revision-at-line-internal): Do not pass the file name to the 'previous-revision call when we don't want a file diff. (Bug#6489)
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog7
-rw-r--r--lisp/vc-annotate.el2
2 files changed, 8 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 7474fcf866f..7aaeb51739d 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,10 @@
12010-06-22 Dan Nicolaescu <dann@ics.uci.edu>
2
3 Fix vc-annotate-show-changeset-diff-revision-at-line for git.
4 * vc-annotate.el (vc-annotate-show-diff-revision-at-line-internal):
5 Do not pass the file name to the 'previous-revision call when we
6 don't want a file diff. (Bug#6489)
7
12010-06-21 Dan Nicolaescu <dann@ics.uci.edu> 82010-06-21 Dan Nicolaescu <dann@ics.uci.edu>
2 9
3 Fix finding revisions in for renamed files in vc-annotate. 10 Fix finding revisions in for renamed files in vc-annotate.
diff --git a/lisp/vc-annotate.el b/lisp/vc-annotate.el
index c372cb9922e..ffc11953903 100644
--- a/lisp/vc-annotate.el
+++ b/lisp/vc-annotate.el
@@ -526,7 +526,7 @@ the file in question, search for the log entry required and move point ."
526 (message "Cannot extract revision number from the current line") 526 (message "Cannot extract revision number from the current line")
527 (setq prev-rev 527 (setq prev-rev
528 (vc-call-backend vc-annotate-backend 'previous-revision 528 (vc-call-backend vc-annotate-backend 'previous-revision
529 fname rev)) 529 (if filediff fname nil) rev))
530 (if (not prev-rev) 530 (if (not prev-rev)
531 (message "Cannot diff from any revision prior to %s" rev) 531 (message "Cannot diff from any revision prior to %s" rev)
532 (save-window-excursion 532 (save-window-excursion