From xemacs-m  Mon Sep  8 19:56:40 1997
Received: from kurims.kurims.kyoto-u.ac.jp (kurims.kurims.kyoto-u.ac.jp [130.54.16.1])
	by xemacs.org (8.8.5/8.8.5) with ESMTP id TAA03954
	for <xemacs-beta@xemacs.org>; Mon, 8 Sep 1997 19:56:34 -0500 (CDT)
Received: from orion.kurims.kyoto-u.ac.jp (orion.kurims.kyoto-u.ac.jp [130.54.16.5]) by kurims.kurims.kyoto-u.ac.jp (8.8.5/3.4W2) with SMTP id JAA01387; Tue, 9 Sep 1997 09:55:55 +0900 (JST)
Received: (from petersen@localhost) by orion.kurims.kyoto-u.ac.jp (SMI-8.6/3.5Wbeta) id JAA20604; Tue, 9 Sep 1997 09:55:55 +0900
To: Andre Spiegel <spiegel@inf.fu-berlin.de>
Cc: XEmacs Beta List <xemacs-beta@xemacs.org>
Subject: [patch] to "vc.el" in xemacs-20.3beta19
X-Emacs: 20.3 "Kyiv" XEmacs  Lucid (beta19) with mule
Mime-Version: 1.0 (generated by SEMI MIME-Edit 0.86 "Naka-Tsurugi")
Content-Type: text/plain; charset=US-ASCII
From: Jens-Ulrik Holger Petersen <petersen@kurims.kyoto-u.ac.jp>
Date: 09 Sep 1997 09:55:54 +0900
Message-ID: <lbhgbvuwyt.fsf@orion.kurims.kyoto-u.ac.jp>
Lines: 19

1997-09-09  Jens-Ulrik Holger Petersen  <petersen@kurims.kyoto-u.ac.jp>

	* packages/vc.el (vc-register): make the second option arg COMMENT 
	do something

diff -u lisp/packages/vc.el~ lisp/packages/vc.el
--- lisp/packages/vc.el~	Tue Sep  9 09:48:16 1997
+++ lisp/packages/vc.el		Tue Sep  9 09:48:16 1997
@@ -844,8 +844,8 @@
    buffer-file-name
    (and override
 	(read-string
-	 (format "Initial version level for %s: " buffer-file-name))))
-  )
+	 (format "Initial version level for %s: " buffer-file-name)))
+   comment))
 
 (defun vc-resynch-window (file &optional keep noquery)
   ;; If the given file is in the current buffer,

