# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1135354951 0
# Node ID f4a3c7808545af77b1953bd96a31415316f18fd6
# Parent  6b544f4ecc4cf7b6aceafbaf68a9a5e3b1c335f6
(vc-annotate-car-last-cons): Defn moved up.

diff -r 6b544f4ecc4c -r f4a3c7808545 lisp/vc.el
--- a/lisp/vc.el	Fri Dec 23 16:20:58 2005 +0000
+++ b/lisp/vc.el	Fri Dec 23 16:22:31 2005 +0000
@@ -2936,6 +2936,10 @@
    (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 @@
 				       (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.