comparison lisp/vc-sccs.el @ 105010:b3c2589ed19e

* vc.el (top): print-log method now takes an optional SHORTLOG argument. Add a new method: root. * vc-hooks.el (vc-prefix-map, vc-menu-map): Add bindings for vc-print-root-log and vc-print-root-diff. * vc-bzr.el (vc-bzr-log-view-mode, vc-bzr-print-log): * vc-git.el (vc-git-print-log, vc-git-log-view-mode): * vc-hg.el (vc-hg-print-log, vc-hg-log-view-mode): Add support for short logs. * vc-cvs.el (vc-cvs-print-log): * vc-mtn.el (vc-mtn-print-log): * vc-rcs.el (vc-rcs-print-log): * vc-sccs.el (vc-sccs-print-log): * vc-svn.el (vc-svn-print-log): Add an optional argument shortlog that is ignored for now.
author Dan Nicolaescu <dann@ics.uci.edu>
date Mon, 14 Sep 2009 04:38:49 +0000
parents f4a041a8c69d
children f8ba8d6fd250
comparison
equal deleted inserted replaced
105009:b520d55cdd72 105010:b3c2589ed19e
329 329
330 ;;; 330 ;;;
331 ;;; History functions 331 ;;; History functions
332 ;;; 332 ;;;
333 333
334 (defun vc-sccs-print-log (files &optional buffer) 334 (defun vc-sccs-print-log (files &optional buffer shortlog)
335 "Get change log associated with FILES." 335 "Get change log associated with FILES."
336 (setq files (vc-expand-dirs files)) 336 (setq files (vc-expand-dirs files))
337 (vc-sccs-do-command buffer 0 "prs" (mapcar 'vc-name files))) 337 (vc-sccs-do-command buffer 0 "prs" (mapcar 'vc-name files)))
338 338
339 (defun vc-sccs-diff (files &optional oldvers newvers buffer) 339 (defun vc-sccs-diff (files &optional oldvers newvers buffer)