diff options
| author | Richard M. Stallman <rms@gnu.org> | 2005-12-23 16:22:31 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 2005-12-23 16:22:31 +0000 |
| commit | 6149bbfbf8d9f3ef2f616a6a2835624cc7dd98e3 (patch) | |
| tree | 3ae924a842cd99e241e0c858295f64ab95f906f8 | |
| parent | 81dc5714545cad6c19a8ea961087544d21db23f0 (diff) | |
| download | emacs-6149bbfbf8d9f3ef2f616a6a2835624cc7dd98e3.tar.gz | |
(vc-annotate-car-last-cons): Defn moved up.
| -rw-r--r-- | lisp/vc.el | 8 |
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." (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. |