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

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

2 files changed, 8 insertions, 3 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b22332ef287..3652c68c4f6 100644
--- 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 15d0258e85d..3301c9c03f0 100644
--- 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)))