(vc-annotate-car-last-cons): Defn moved up.

diff --git a/lisp/vc.el b/lisp/vc.el
index 6d82b56f9b687193dd7a690676c3a05f5d243ba4..ed6b13ac2ec730ceb018d2668d8ba9c2203f7082 100644 (file)
--- a/lisp/vc.el
+++ b/lisp/vc.el
@@ -2936,6 +2936,10 @@ if present.  The current time is used as the offset."
    (if ratio (vc-annotate-time-span vc-annotate-color-map ratio)))
   (message "Redisplaying annotation...done"))
 
+(defun vc-annotate-car-last-cons (a-list)
+  "Return car of last cons in association list A-LIST."
+  (caar (last a-list)))
+
 (defun vc-annotate-display-autoscale (&optional full)
   "Highlight the output of \\[vc-annotate] using an autoscaled color map.
 Autoscaling means that the map is scaled from the current time to the
@@ -3239,10 +3243,6 @@ revision."
                                       (previous-line)
                                       (line-number-at-pos))))))))
 
-(defun vc-annotate-car-last-cons (a-list)
-  "Return car of last cons in association list A-LIST."
-  (caar (last a-list)))
-
 (defun vc-annotate-time-span (a-list span &optional quantize)
   "Apply factor SPAN to the time-span of association list A-LIST.
 Return the new alist.