Mercurial > emacs
changeset 64545:f227dc7508ad
(cvs-flags-query, cvs-strings->string, cvs-prefix-get): Fix typos in docstrings.
| author | Juanma Barranquero <lekktu@gmail.com> |
|---|---|
| date | Wed, 20 Jul 2005 20:51:27 +0000 |
| parents | 7a1446b50929 |
| children | c0ad64b42b78 |
| files | lisp/pcvs-util.el |
| diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/pcvs-util.el Wed Jul 20 20:41:53 2005 +0000 +++ b/lisp/pcvs-util.el Wed Jul 20 20:51:27 2005 +0000 @@ -188,7 +188,7 @@ "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 @@ (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 @@ (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))))