From f009f3bce9b1503a7a05ff159f1690ec1434d5b3 Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Sun, 9 May 2004 01:54:01 +0000 Subject: [PATCH] (cvs-mode-run, cvs-is-within-p): Fix typo in docstring. (cvs-get-marked): Remove redundant arglist info. --- lisp/pcvs.el | 9 +++------ 1 file changed, 3 insertions(+), 6 deletions(-) diff --git a/lisp/pcvs.el b/lisp/pcvs.el index 21e34fbc7ed..8cb21828d69 100644 --- a/lisp/pcvs.el +++ b/lisp/pcvs.el @@ -1312,10 +1312,7 @@ If there are any marked tins, and IGNORE-MARKS is nil, return them. Otherwise, if the cursor selects a directory, and IGNORE-CONTENTS is nil, return all files in it, else return just the directory. Otherwise return (a list containing) the file the cursor points to, or -an empty list if it doesn't point to a file at all. - -Args: &optional IGNORE-MARKS IGNORE-CONTENTS." - +an empty list if it doesn't point to a file at all." (let ((fis nil)) (dolist (fi (if (and (boundp 'cvs-minor-current-files) (consp cvs-minor-current-files)) @@ -1754,7 +1751,7 @@ Signal an error if there is no backup file." (defun cvs-is-within-p (fis dir) - "Non-nil is buffer is inside one of FIS (in DIR)." + "Non-nil if buffer is inside one of FIS (in DIR)." (when (stringp buffer-file-name) (setq buffer-file-name (expand-file-name buffer-file-name)) (let (ret) @@ -1774,7 +1771,7 @@ BUF is the buffer to be used for cvs' output. DONT-CHANGE-DISC non-nil indicates that the command will not change the contents of files. This is only used by the parser. POSTPROC is a list of expressions to be evaluated at the very end (after - parsing if applicable). It will be prepended with `progn' is necessary." + parsing if applicable). It will be prepended with `progn' if necessary." (let ((def-dir default-directory)) ;; Save the relevant buffers (save-some-buffers nil (lambda () (cvs-is-within-p fis def-dir)))) -- 2.39.2