mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-07 15:21:46 +00:00
Code Issues Releases Activity

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

Browse Source
This commit is contained in:
Richard M. Stallman 2005-12-23 16:22:31 +00:00
parent 81dc571454
commit 6149bbfbf8
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
lisp/vc.el
View File

@ -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.