vc.el vc-annotate-backend

vc.el vc-annotate-backend

[Jhair Tocancipa Triana]

Hi,

Since revision 1.408 of vc.el, the vc-annotate command triggers the
following error.

,----[ C-x v g ]
| Debugger entered--Lisp error: (file-error "Cannot open load file" "vc-nil")
|   require(vc-nil)
|   vc-find-backend-function(nil annotate-command)
|   vc-annotate("/home/jtocancipa/local/src/emacs/src/dispnew.c" "1.358" nil)
|   call-interactively(vc-annotate)
`----

I can make it work with the following change, hopefully it is correct:

--- vc.el	25 Dec 2005 15:35:06 +0100	1.409
+++ vc.el	25 Dec 2005 16:09:26 +0100	
@@ -3092,6 +3092,7 @@
   (setq vc-annotate-display-mode display-mode) ;Not sure why.  --Stef
   (let* ((temp-buffer-name (format "*Annotate %s (rev %s)*" (buffer-name) rev))
          (temp-buffer-show-function 'vc-annotate-display-select))
+    (setq vc-annotate-backend (vc-backend buffer-file-name))
     (message "Annotating...")
     ;; If BUF is specified it tells in which buffer we should put the
     ;; annotations.  This is used when switching annotations to another

-- 
--Jhair

PGP key available from public servers - ID: 0xBAA600D0

Re: vc.el vc-annotate-backend

[Stefan Monnier]

> Since revision 1.408 of vc.el, the vc-annotate command triggers the
> following error.

> ,----[ C-x v g ]
> | Debugger entered--Lisp error: (file-error "Cannot open load file" "vc-nil")
> |   require(vc-nil)
> |   vc-find-backend-function(nil annotate-command)
> |   vc-annotate("/home/jtocancipa/local/src/emacs/src/dispnew.c" "1.358" nil)
> |   call-interactively(vc-annotate)
> `----

Sorry, I left an obsolete piece of code that now burps.  Should be fixed now.


        Stefan