diff lisp/vc-sccs.el @ 106060:2f9ecf376c7a

* vc.el (vc-log-show-limit): Default to 2000. (vc-print-log-internal): Insert buttons to request more entries when limiting the output. * vc-sccs.el (vc-sccs-print-log): * vc-rcs.el (vc-rcs-print-log): * vc-cvs.el (vc-cvs-print-log): * vc-git.el (vc-git-print-log): Return 'limit-unsupported when LIMIT is non-nil.
author Dan Nicolaescu <dann@ics.uci.edu>
date Mon, 16 Nov 2009 20:36:06 +0000
parents 2bed02fa3041
children 6e0f1038bc44
line wrap: on
line diff
--- a/lisp/vc-sccs.el	Mon Nov 16 20:10:39 2009 +0000
+++ b/lisp/vc-sccs.el	Mon Nov 16 20:36:06 2009 +0000
@@ -338,7 +338,8 @@
 (defun vc-sccs-print-log (files buffer &optional shortlog limit)
   "Get change log associated with FILES."
   (setq files (vc-expand-dirs files))
-  (vc-sccs-do-command buffer 0 "prs" (mapcar 'vc-name files)))
+  (vc-sccs-do-command buffer 0 "prs" (mapcar 'vc-name files))
+  (when limit 'limit-unsupported))
 
 (defun vc-sccs-diff (files &optional oldvers newvers buffer)
   "Get a difference report using SCCS between two filesets."