From: André Spiegel <spiegel@gnu.org>
Date: Mon, 25 Feb 2002 22:03:24 +0000 (+0000)
Subject: (vc-cvs-diff, vc-cvs-diff-tree): Use consistent parameter format for
X-Git-Tag: ttn-vms-21-2-B4~16476
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=df8e0a91a1760b9849eafe212295b94f1054e417;p=emacs.git

(vc-cvs-diff, vc-cvs-diff-tree): Use consistent parameter format for
vc-diff-switches-list.
---

diff --git a/lisp/vc-cvs.el b/lisp/vc-cvs.el
index 88805110cc9..6516b130180 100644
--- a/lisp/vc-cvs.el
+++ b/lisp/vc-cvs.el
@@ -5,7 +5,7 @@
 ;; Author:      FSF (see vc.el for full credits)
 ;; Maintainer:  Andre Spiegel <spiegel@gnu.org>
 
-;; $Id: vc-cvs.el,v 1.31 2002/01/08 20:00:19 spiegel Exp $
+;; $Id: vc-cvs.el,v 1.33 2002/02/21 20:16:47 spiegel Exp $
 
 ;; This file is part of GNU Emacs.
 
@@ -559,7 +559,7 @@ The changes are between FIRST-VERSION and SECOND-VERSION."
 
 (defun vc-cvs-diff (file &optional oldvers newvers)
   "Get a difference report using CVS between two versions of FILE."
-  (let (options status (diff-switches-list (vc-diff-switches-list cvs)))
+  (let (options status (diff-switches-list (vc-diff-switches-list 'CVS)))
     (if (string= (vc-workfile-version file) "0")
 	;; This file is added but not yet committed; there is no master file.
 	(if (or oldvers newvers)
@@ -605,7 +605,7 @@ The changes are between FIRST-VERSION and SECOND-VERSION."
         (apply 'vc-do-command "*vc-diff*" 1 "cvs" nil "diff"
                (and rel1 (concat "-r" rel1))
                (and rel2 (concat "-r" rel2))
-               (vc-diff-switches-list cvs))))))
+               (vc-diff-switches-list 'CVS))))))
 
 (defun vc-cvs-annotate-command (file buffer &optional version)
   "Execute \"cvs annotate\" on FILE, inserting the contents in BUFFER.