mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

(vc-annotate-display-autoscale): Make sure

Browse source 
point is at bol after calling `annotate-time'.
This commit is contained in:
Thien-Thi Nguyen 2004-11-03 10:41:46 +00:00
parent f36e4afe47
commit 2e73435333
2 changed files with 4 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

1
lisp/ChangeLog
View file

@ -2,6 +2,7 @@
* vc.el (vc-annotate-display-autoscale): Add prefix-arg
spec in `interactive' form, and mention it in the docstring.
Also, make sure point is at bol after calling `annotate-time'.
2004-11-02 Richard M. Stallman <rms@gnu.org>

4
lisp/vc.el
View file

@ -2907,7 +2907,9 @@ cover the range from the oldest annotation to the newest."
;; Run through this file and find the oldest and newest dates annotated.
(save-excursion
(goto-char (point-min))
(while (setq date (vc-call-backend vc-annotate-backend 'annotate-time))
(while (setq date (prog1 (vc-call-backend vc-annotate-backend
'annotate-time)
(forward-line 1)))
(if (> date newest)
(setq newest date))
(if (< date oldest)