diff lisp/vc-rcs.el @ 106671:1b4df859a104

* vc-rcs.el (vc-rcs-register): Fix registering a specific version.
author Dan Nicolaescu <dann@ics.uci.edu>
date Mon, 28 Dec 2009 11:20:02 -0800
parents 6e0f1038bc44
children 1d1d5d9bd884
line wrap: on
line diff
--- a/lisp/vc-rcs.el	Mon Dec 28 10:34:51 2009 -0800
+++ b/lisp/vc-rcs.el	Mon Dec 28 11:20:02 2009 -0800
@@ -277,6 +277,8 @@
 Automatically retrieve a read-only version of the file with keywords
 expanded if `vc-keep-workfiles' is non-nil, otherwise, delete the workfile."
   (let (subdir name)
+    ;; When REV is specified, we need to force using "-t-".
+    (when rev (unless comment (setq comment "")))
     (dolist (file files)
       (and (not (file-exists-p
 		 (setq subdir (expand-file-name "RCS"