(vc-annotate-display-autoscale): Add prefix-arg

spec in `interactive' form, and mention it in the docstring.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b22332ef287d8300c52acd41e6d420ef3caf5e19..3652c68c4f63fdd77d09720a171e238b42fcc84e 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2004-11-03  Thien-Thi Nguyen  <ttn@gnu.org>
+
+       * vc.el (vc-annotate-display-autoscale): Add prefix-arg
+       spec in `interactive' form, and mention it in the docstring.
+
 2004-11-02  Richard M. Stallman  <rms@gnu.org>
 
        * emacs-lisp/elp.el (elp-instrument-function):
@@ -30,7 +35,7 @@
        find-file-existing.  Add "New File..." that calls find-file.
 
        * diropen.pbm diropen.xpm: New files.
-       
+
        * toolbar/tool-bar.el (tool-bar-setup): Tool bar item dired uses
        icon diropen.  New tool bar item find-file-existing uses icon open.
 

diff --git a/lisp/vc.el b/lisp/vc.el
index 15d0258e85de979ea36438bcfe415d39f73649f0..3301c9c03f01c9d2a03cb0db1ac99b8a5f4eefca 100644 (file)
--- a/lisp/vc.el
+++ b/lisp/vc.el
@@ -2896,9 +2896,9 @@ if present.  The current time is used as the offset."
 (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
-oldest annotation in the buffer, or, with argument FULL non-nil, to
+oldest annotation in the buffer, or, with prefix argument FULL, to
 cover the range from the oldest annotation to the newest."
-  (interactive)
+  (interactive "P")
   (let ((newest 0.0)
        (oldest 999999.)                ;Any CVS users at the founding of Rome?
        (current (vc-annotate-convert-time (current-time)))