# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1084067641 0
# Node ID f673d8bf105a112a732d0f91666f16d122942e8d
# Parent  f263b4b25c9e96077a81dc59f0435fb49d0e1042
(cvs-mode-run, cvs-is-within-p): Fix typo in docstring.
(cvs-get-marked): Remove redundant arglist info.

diff -r f263b4b25c9e -r f673d8bf105a lisp/pcvs.el
--- a/lisp/pcvs.el	Sun May 09 01:28:34 2004 +0000
+++ b/lisp/pcvs.el	Sun May 09 01:54:01 2004 +0000
@@ -1312,10 +1312,7 @@
 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 @@
 
 
 (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 @@
 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))))