comparison lisp/vc-rcs.el @ 31835:67ea0d3e062b

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

31834:b7966a0eec91

;; Copyright (C) 1992,93,94,95,96,97,98,99,2000  Free Software Foundation, Inc.

;; Author:     FSF (see vc.el for full credits)
;; Maintainer: Andre Spiegel <[e-mail]>

;; $Id: vc-rcs.el,v 1.4 2000/09/09 00:48:40 monnier Exp $

;; This file is part of GNU Emacs.

;; GNU Emacs is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by

	     (concat (if vc-keep-workfiles "-u" "-r") rev)
	     (concat "-m" comment)
	     ;; 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")
	     switches)
      (vc-file-setprop file 'vc-workfile-version nil)

      ;; determine the new workfile version
      (set-buffer "*vc*")

31835:67ea0d3e062b

;; Copyright (C) 1992,93,94,95,96,97,98,99,2000  Free Software Foundation, Inc.

;; Author:     FSF (see vc.el for full credits)
;; Maintainer: Andre Spiegel <[e-mail]>

;; $Id: vc-rcs.el,v 1.5 2000/09/21 13:21:41 spiegel Exp $

;; This file is part of GNU Emacs.

;; GNU Emacs is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by

	     (concat (if vc-keep-workfiles "-u" "-r") rev)
	     (concat "-m" comment)
	     ;; allow creation of branches with no changes;
	     ;; this is used by vc-rcs-receive-file if the
	     ;; base version cannot be found
	     (if (and (stringp rev) (string-match ".1.1$" rev)) "-f")
	     switches)
      (vc-file-setprop file 'vc-workfile-version nil)

      ;; determine the new workfile version
      (set-buffer "*vc*")