From: Johan Bockgård <bojohan@gnu.org>
Date: Wed, 25 Nov 2009 23:47:31 +0000 (+0000)
Subject: (vc-annotate-revision-previous-to-line): Really use previous revision.
X-Git-Tag: emacs-pretest-23.1.90~223
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a5d358f83cf8fb1f106095c304421ae335e9f4b9;p=emacs.git

(vc-annotate-revision-previous-to-line): Really use previous revision.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index add90d7c32f..6b424a45bbe 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2009-11-25  Johan Bockgård  <bojohan@gnu.org>
+
+	* vc-annotate.el (vc-annotate-revision-previous-to-line):
+	Really use previous revision.
+
 2009-11-25  Kevin Ryde  <user42@zip.com.au>
 
 	* man.el (Man-completion-table): default-directory "/" in case
diff --git a/lisp/vc-annotate.el b/lisp/vc-annotate.el
index a05816372bf..122aec982ca 100644
--- a/lisp/vc-annotate.el
+++ b/lisp/vc-annotate.el
@@ -476,7 +476,7 @@ Return a cons (REV . FILENAME)."
 	(setq prev-rev
 	      (vc-call-backend vc-annotate-backend 'previous-revision
                                fname rev))
-	(vc-annotate-warp-revision rev fname)))))
+	(vc-annotate-warp-revision prev-rev fname)))))
 
 (defun vc-annotate-show-log-revision-at-line ()
   "Visit the log of the revision at line."