From 1f8da6df7d15ee9eb08329526158926f459eee79 Mon Sep 17 00:00:00 2001 From: Magnus Henoch Date: Wed, 2 Jul 2008 11:56:11 +0000 Subject: [PATCH] 2008-07-02 Magnus Henoch * vc-git.el (vc-git-annotate-command): Use proper option for specifying revision. --- lisp/ChangeLog | 5 +++++ lisp/vc-git.el | 3 +-- 2 files changed, 6 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 13b7ca133c0..fec981826ba 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2008-07-02 Magnus Henoch + + * vc-git.el (vc-git-annotate-command): Use proper option for + specifying revision. + 2008-07-02 Francesc Rocher * startup.el (fancy-splash-head): Prefer SVG or PNG splash image, diff --git a/lisp/vc-git.el b/lisp/vc-git.el index 4c004dd1e35..842d7135448 100644 --- a/lisp/vc-git.el +++ b/lisp/vc-git.el @@ -539,9 +539,8 @@ or BRANCH^ (where \"^\" can be repeated)." table)) (defun vc-git-annotate-command (file buf &optional rev) - ;; FIXME: rev is ignored (let ((name (file-relative-name file))) - (vc-git-command buf 0 name "blame" (if rev (concat "-r" rev))))) + (vc-git-command buf 0 name "blame" rev))) (declare-function vc-annotate-convert-time "vc-annotate" (time)) -- 2.39.2