Mercurial > emacs

comparison lisp/vc-sccs.el @ 106033:2bed02fa3041

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* vc.el (vc-log-show-limit): New variable. (vc-print-log, vc-print-root-log): Add new argument LIMIT. Set it when using a prefix argument. (vc-print-log-internal): Add new argument LIMIT. * vc-svn.el (vc-svn-print-log): * vc-mtn.el (vc-mtn-print-log): * vc-hg.el (vc-hg-print-log): * vc-bzr.el (vc-bzr-print-log): Add new optional argument LIMIT, pass it to the log command when set. Make the BUFFER argument non-optional. * vc-sccs.el (vc-sccs-print-log): * vc-rcs.el (vc-rcs-print-log): * vc-git.el (vc-git-print-log): * vc-cvs.el (vc-cvs-print-log): Add new optional argument LIMIT, ignore it. Make the BUFFER argument non-optional
author Dan Nicolaescu <dann@ics.uci.edu>
date Sun, 15 Nov 2009 20:28:58 +0000
parents a0f778f4a995
children 2f9ecf376c7a
comparison
equal deleted inserted replaced
106032:42cdafa98c50 106033:2bed02fa3041
333 333
334 ;;; 334 ;;;
335 ;;; History functions 335 ;;; History functions
336 ;;; 336 ;;;
337 337
338 (defun vc-sccs-print-log (files &optional buffer shortlog) 338 (defun vc-sccs-print-log (files buffer &optional shortlog limit)
339 "Get change log associated with FILES." 339 "Get change log associated with FILES."
340 (setq files (vc-expand-dirs files)) 340 (setq files (vc-expand-dirs files))
341 (vc-sccs-do-command buffer 0 "prs" (mapcar 'vc-name files))) 341 (vc-sccs-do-command buffer 0 "prs" (mapcar 'vc-name files)))
342 342
343 (defun vc-sccs-diff (files &optional oldvers newvers buffer) 343 (defun vc-sccs-diff (files &optional oldvers newvers buffer)