# HG changeset patch # User Thien-Thi Nguyen # Date 1099478435 0 # Node ID ce81228800f3b237f1ec831644e154c64d598de9 # Parent 45788a7174a4704bf3c1222a6aa524d12d5073d5 (vc-annotate-display-autoscale): Make sure point is at bol after calling `annotate-time'. diff -r 45788a7174a4 -r ce81228800f3 lisp/vc.el --- a/lisp/vc.el Wed Nov 03 10:22:39 2004 +0000 +++ b/lisp/vc.el Wed Nov 03 10:40:35 2004 +0000 @@ -2907,7 +2907,9 @@ ;; 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)