From: André Spiegel <spiegel@gnu.org>
Date: Fri, 22 Sep 2000 07:48:08 +0000 (+0000)
Subject: (vc-rcs-checkin): Fix bug that prevented check-in without explicit
X-Git-Tag: emacs-pretest-21.0.90~1430
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ed70380d9d1372cd084d32bee9ecca98350ff720;p=emacs.git

(vc-rcs-checkin): Fix bug that prevented check-in without explicit
revision number.
---

diff --git a/lisp/vc-rcs.el b/lisp/vc-rcs.el
index 758b8ce628c..09accd148a9 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.4 2000/09/09 00:48:40 monnier Exp $
+;; $Id: vc-rcs.el,v 1.5 2000/09/21 13:21:41 spiegel Exp $
 
 ;; This file is part of GNU Emacs.
 
@@ -592,7 +592,7 @@ CVS releases are handled reasonably, too \(1.3 < 1.4* < 1.5\)."
 	     ;; allow creation of branches with no changes;
 	     ;; this is used by vc-rcs-receive-file if the
 	     ;; base version cannot be found
-	     (if (string-match ".1.1$" rev) "-f")
+	     (if (and (stringp rev) (string-match ".1.1$" rev)) "-f")
 	     switches)
       (vc-file-setprop file 'vc-workfile-version nil)