when creating new masters.")
(defvar vc-make-backup-files nil
- "*If non-nil, backups of registered files are made according to
-the make-backup-files variable. Otherwise, prevents backups being made.")
+ "*If non-nil, backups of registered files are made as with other files.
+If nil (the default), for files covered by version control don't get backups.")
(defvar vc-rcs-status t
"*If non-nil, revision and locks on RCS working file displayed in modeline.
(narrow-to-region (match-beginning 1) (match-end 1))
(goto-char (point-min))
(while (re-search-forward lock-pattern nil t)
- (replace-match (if (eobp) "" "-") t t))
+ (replace-match (if (eobp) "" ":") t t))
(buffer-string)))
(status
(if (not (string-equal locks ""))