From 6149bbfbf8d9f3ef2f616a6a2835624cc7dd98e3 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Fri, 23 Dec 2005 16:22:31 +0000 Subject: [PATCH] (vc-annotate-car-last-cons): Defn moved up. --- lisp/vc.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/lisp/vc.el b/lisp/vc.el index 6d82b56f9b6..ed6b13ac2ec 100644 --- 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. -- 2.39.5