# HG changeset patch
# User Dan Nicolaescu <dann@ics.uci.edu>
# Date 1211044066 0
# Node ID e1e4085b4297bcb542777b199818df0ab4b2dfe3
# Parent  4ce13b37e978014d2cd236a8a624ddd1dc2d55c9
(vc-annotate-show-diff-revision-at-line): Change
vc-diff-internal arg to match what vc-deduce-fileseset returns now.

diff -r 4ce13b37e978 -r e1e4085b4297 lisp/ChangeLog
--- a/lisp/ChangeLog	Sat May 17 14:33:48 2008 +0000
+++ b/lisp/ChangeLog	Sat May 17 17:07:46 2008 +0000
@@ -1,3 +1,8 @@
+2008-05-17  Dan Nicolaescu  <dann@rosas>
+
+	* vc.el (vc-annotate-show-diff-revision-at-line): Change
+	vc-diff-internal arg to match what vc-deduce-fileseset returns now.
+
 2008-05-17  Vinicius Jose Latorre  <viniciusjl@ig.com.br>
 
 	* menu-bar.el (menu-bar-select-buffer): Reinsert it as msb.el use it.
diff -r 4ce13b37e978 -r e1e4085b4297 lisp/vc.el
--- a/lisp/vc.el	Sat May 17 14:33:48 2008 +0000
+++ b/lisp/vc.el	Sat May 17 17:07:46 2008 +0000
@@ -1788,7 +1788,7 @@
 ;; VC status implementation
 
 (defun vc-default-status-extra-headers (backend dir)
-  ;; Be loud by default to remind people to add coded to display
+  ;; Be loud by default to remind people to add code to display
   ;; backend specific headers.
   ;; XXX: change this to return nil before the release.
   "Extra      : Add backend specific headers here")
@@ -3103,7 +3103,10 @@
 	  (save-window-excursion
 	    (vc-diff-internal
 	     nil
-	     (cons vc-annotate-backend (list vc-annotate-parent-file))
+	     ;; The value passed here should follow what
+	     ;; `vc-deduce-fileset' returns.
+	     (cons vc-annotate-backend
+		   (cons (list vc-annotate-parent-file) nil))
 	     prev-rev rev-at-line))
 	  (switch-to-buffer "*vc-diff*"))))))