aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman1993-11-25 03:46:27 +0000
committerRichard M. Stallman1993-11-25 03:46:27 +0000
commit5032bd23072d5f08365286b7d2f176a205f60c06 (patch)
treed2f7c9ce6a1e9cc4f4313db88f9a52954a8294e4
parent3bede93e156e5633e15a87f561bc48e3c3a9ea6b (diff)
downloademacs-5032bd23072d5f08365286b7d2f176a205f60c06.tar.gz
emacs-5032bd23072d5f08365286b7d2f176a205f60c06.zip
(vc-make-backup-files): Doc fix.
(vc-rcs-status): Use colon, not dash, in the string LOCKS.
-rw-r--r--lisp/vc-hooks.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/vc-hooks.el b/lisp/vc-hooks.el
index 629d5caa69a..283d2bf56eb 100644
--- a/lisp/vc-hooks.el
+++ b/lisp/vc-hooks.el
@@ -35,8 +35,8 @@ The first pair corresponding to a given back end is used as a template
35when creating new masters.") 35when creating new masters.")
36 36
37(defvar vc-make-backup-files nil 37(defvar vc-make-backup-files nil
38 "*If non-nil, backups of registered files are made according to 38 "*If non-nil, backups of registered files are made as with other files.
39the make-backup-files variable. Otherwise, prevents backups being made.") 39If nil (the default), for files covered by version control don't get backups.")
40 40
41(defvar vc-rcs-status t 41(defvar vc-rcs-status t
42 "*If non-nil, revision and locks on RCS working file displayed in modeline. 42 "*If non-nil, revision and locks on RCS working file displayed in modeline.
@@ -216,7 +216,7 @@ visiting FILE."
216 (narrow-to-region (match-beginning 1) (match-end 1)) 216 (narrow-to-region (match-beginning 1) (match-end 1))
217 (goto-char (point-min)) 217 (goto-char (point-min))
218 (while (re-search-forward lock-pattern nil t) 218 (while (re-search-forward lock-pattern nil t)
219 (replace-match (if (eobp) "" "-") t t)) 219 (replace-match (if (eobp) "" ":") t t))
220 (buffer-string))) 220 (buffer-string)))
221 (status 221 (status
222 (if (not (string-equal locks "")) 222 (if (not (string-equal locks ""))