# HG changeset patch # User Andr Spiegel # Date 969608888 0 # Node ID 67ea0d3e062b0ea02ca78c1e2d57f58b2ecb4be9 # Parent b7966a0eec91217d30303e6b708bb97680edffe7 (vc-rcs-checkin): Fix bug that prevented check-in without explicit revision number. diff -r b7966a0eec91 -r 67ea0d3e062b lisp/vc-rcs.el --- a/lisp/vc-rcs.el Thu Sep 21 21:50:10 2000 +0000 +++ b/lisp/vc-rcs.el Fri Sep 22 07:48:08 2000 +0000 @@ -5,7 +5,7 @@ ;; Author: FSF (see vc.el for full credits) ;; Maintainer: Andre Spiegel -;; $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 @@ ;; 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)