diff options
| author | Juanma Barranquero <lekktu@gmail.com> | 2005-07-20 20:51:27 +0000 |
|---|---|---|
| committer | Juanma Barranquero <lekktu@gmail.com> | 2005-07-20 20:51:27 +0000 |
| commit | e05a39ba98ab9d4de28e21704b1555fac9aae744 (patch) | |
| tree | c45012c63f245896b750843c4a27fe169c2e072a /lisp/pcvs-util.el | |
| parent | 0d5f604633b0d512d96923a20f2401aba43e2932 (diff) | |
| download | emacs-e05a39ba98ab9d4de28e21704b1555fac9aae744.tar.gz emacs-e05a39ba98ab9d4de28e21704b1555fac9aae744.tar.bz2 emacs-e05a39ba98ab9d4de28e21704b1555fac9aae744.zip | |
(cvs-flags-query, cvs-strings->string, cvs-prefix-get): Fix typos in docstrings.
Diffstat (limited to 'lisp/pcvs-util.el')
| -rw-r--r-- | lisp/pcvs-util.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/pcvs-util.el b/lisp/pcvs-util.el index 9531f06b3c6..05495d1e264 100644 --- a/lisp/pcvs-util.el +++ b/lisp/pcvs-util.el @@ -188,7 +188,7 @@ arguments. If ARGS is not a list, no argument will be passed." "Concatenate the STRINGS, adding the SEPARATOR (default \" \"). This tries to quote the strings to avoid ambiguity such that (cvs-string->strings (cvs-strings->string strs)) == strs -Only some SEPARATOR will work properly." +Only some SEPARATORs will work properly." (let ((sep (or separator " "))) (mapconcat (lambda (str) @@ -277,7 +277,7 @@ The SEPARATOR regexp defaults to \"\\s-+\"." (defun cvs-flags-query (sym &optional desc arg) "Query flags based on SYM. -Optional argument DESC will be used for the prompt +Optional argument DESC will be used for the prompt. If ARG (or a prefix argument) is nil, just use the 0th default. If it is a non-negative integer, use the corresponding default. If it is a negative integer query for a new value of the corresponding @@ -382,7 +382,7 @@ If ARG is nil toggle the PREFIX's value between its 0th default and nil (defun cvs-prefix-get (sym &optional read-only) "Return the current value of the prefix SYM. -and reset it unless READ-ONLY is non-nil." +And reset it unless READ-ONLY is non-nil." (prog1 (symbol-value sym) (unless (or read-only (cvs-flags-persist (symbol-value (cvs-prefix-sym sym)))) |