(vc-print-log-internal): Make `limit' optional for better

compatibility (e.g. with vc-annotate.el).

2 files changed, 9 insertions, 3 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 04cbca0e721..b11127c7a7b 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,7 +1,12 @@
+2009-11-25  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+        * vc.el (vc-print-log-internal): Make `limit' optional for better
+        compatibility (e.g. with vc-annotate.el).
+
 2009-11-24  Kevin Ryde  <user42@zip.com.au>
 
-        * emacs-lisp/checkdoc.el (checkdoc-proper-noun-regexp): Build
-        value with regexp-opt instead of explicit joining loop.  (My
+        * emacs-lisp/checkdoc.el (checkdoc-proper-noun-regexp):
+        Build value with regexp-opt instead of explicit joining loop.  (My
         Bug#4927.)
 
         * emacs-lisp/elint.el (elint-add-required-env): Better error message
diff --git a/lisp/vc.el b/lisp/vc.el
index 7c4cfbd28af..a866431a57b 100644
--- a/lisp/vc.el
+++ b/lisp/vc.el
@@ -1859,7 +1859,8 @@ If it contains `directory' then if the fileset contains a directory show a short
 If it contains `file' then show short logs for files.
 Not all VC backends support short logs!")
 
-(defun vc-print-log-internal (backend files working-revision limit)
+(defun vc-print-log-internal (backend files working-revision
+                                      &optional limit)
   ;; Don't switch to the output buffer before running the command,
   ;; so that any buffer-local settings in the vc-controlled
   ;; buffer can be accessed by the command.