From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Tue, 8 Oct 2002 20:23:36 +0000 (+0000)
Subject: (vc-rcs-find-version): Fix vc-checkout-switches use.
X-Git-Tag: ttn-vms-21-2-B4~12896
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=831afb58a45b1a52fafd3c2341fe1e0062084ef2;p=emacs.git

(vc-rcs-find-version): Fix vc-checkout-switches use.
---

diff --git a/lisp/vc-rcs.el b/lisp/vc-rcs.el
index a09472f6a1c..9a4c4e89dd7 100644
--- a/lisp/vc-rcs.el
+++ b/lisp/vc-rcs.el
@@ -5,7 +5,7 @@
 ;; Author:     FSF (see vc.el for full credits)
 ;; Maintainer: Andre Spiegel <spiegel@gnu.org>
 
-;; $Id: vc-rcs.el,v 1.27 2002/10/04 18:38:04 monnier Exp $
+;; $Id: vc-rcs.el,v 1.28 2002/10/08 15:33:18 monnier Exp $
 
 ;; This file is part of GNU Emacs.
 
@@ -360,7 +360,9 @@ whether to remove it."
 	 buffer 0 "co" (vc-name file)
 	 "-q" ;; suppress diagnostic output
 	 (concat "-p" rev)
-	 vc-checkout-switches))
+	 (if (stringp vc-checkout-switches)
+	     (list vc-checkout-switches)
+	   vc-checkout-switches)))
 
 (defun vc-rcs-checkout (file &optional editable rev)
   "Retrieve a copy of a saved version of FILE."