aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman2005-12-23 16:22:31 +0000
committerRichard M. Stallman2005-12-23 16:22:31 +0000
commit6149bbfbf8d9f3ef2f616a6a2835624cc7dd98e3 (patch)
tree3ae924a842cd99e241e0c858295f64ab95f906f8
parent81dc5714545cad6c19a8ea961087544d21db23f0 (diff)
downloademacs-6149bbfbf8d9f3ef2f616a6a2835624cc7dd98e3.tar.gz
emacs-6149bbfbf8d9f3ef2f616a6a2835624cc7dd98e3.zip
(vc-annotate-car-last-cons): Defn moved up.
-rw-r--r--lisp/vc.el8
1 files 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."
2936 (if ratio (vc-annotate-time-span vc-annotate-color-map ratio))) 2936 (if ratio (vc-annotate-time-span vc-annotate-color-map ratio)))
2937 (message "Redisplaying annotation...done")) 2937 (message "Redisplaying annotation...done"))
2938 2938
2939(defun vc-annotate-car-last-cons (a-list)
2940 "Return car of last cons in association list A-LIST."
2941 (caar (last a-list)))
2942
2939(defun vc-annotate-display-autoscale (&optional full) 2943(defun vc-annotate-display-autoscale (&optional full)
2940 "Highlight the output of \\[vc-annotate] using an autoscaled color map. 2944 "Highlight the output of \\[vc-annotate] using an autoscaled color map.
2941Autoscaling means that the map is scaled from the current time to the 2945Autoscaling means that the map is scaled from the current time to the
@@ -3239,10 +3243,6 @@ revision."
3239 (previous-line) 3243 (previous-line)
3240 (line-number-at-pos)))))))) 3244 (line-number-at-pos))))))))
3241 3245
3242(defun vc-annotate-car-last-cons (a-list)
3243 "Return car of last cons in association list A-LIST."
3244 (caar (last a-list)))
3245
3246(defun vc-annotate-time-span (a-list span &optional quantize) 3246(defun vc-annotate-time-span (a-list span &optional quantize)
3247 "Apply factor SPAN to the time-span of association list A-LIST. 3247 "Apply factor SPAN to the time-span of association list A-LIST.
3248Return the new alist. 3248Return the new alist.