andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(vc-rcs-print-log, vc-rcs-diff): Add optional BUFFER argument.

Browse source
This commit is contained in:
André Spiegel 2004-03-21 15:46:23 +00:00
parent a9817cc404
commit 69c33e5d78
1 changed files with 5 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
lisp/vc-rcs.el
View file

@ -5,7 +5,7 @@
;; Author: FSF (see vc.el for full credits)
;; Maintainer: Andre Spiegel <spiegel@gnu.org>
;; $Id: vc-rcs.el,v 1.37 2003/05/08 19:24:56 monnier Exp $
;; $Id: vc-rcs.el,v 1.38 2003/09/01 15:45:17 miles Exp $
;; This file is part of GNU Emacs.
@ -479,14 +479,14 @@ Needs RCS 5.6.2 or later for -M."
;;; History functions
;;;
(defun vc-rcs-print-log (file)
(defun vc-rcs-print-log (file &optional buffer)
"Get change log associated with FILE."
(vc-do-command nil 0 "rlog" (vc-name file)))
(vc-do-command buffer 0 "rlog" (vc-name file)))
(defun vc-rcs-diff (file &optional oldvers newvers)
(defun vc-rcs-diff (file &optional oldvers newvers buffer)
"Get a difference report using RCS between two versions of FILE."
(if (not oldvers) (setq oldvers (vc-workfile-version file)))
(apply 'vc-do-command "*vc-diff*" 1 "rcsdiff" file
(apply 'vc-do-command (or buffer "*vc-diff*") 1 "rcsdiff" file
(append (list "-q"
(concat "-r" oldvers)
(and newvers (concat "-r" newvers)))