Mercurial > emacs
diff lisp/pcvs-parse.el @ 37337:00d515266792
(cvs-parse-run-table): Remove misleading text.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Fri, 13 Apr 2001 14:55:48 +0000 |
| parents | 4d41a2e49d39 |
| children | 7a94f1c588c4 |
line wrap: on
line diff
--- a/lisp/pcvs-parse.el Fri Apr 13 11:20:54 2001 +0000 +++ b/lisp/pcvs-parse.el Fri Apr 13 14:55:48 2001 +0000 @@ -4,7 +4,7 @@ ;; Author: Stefan Monnier <monnier@cs.yale.edu> ;; Keywords: pcl-cvs -;; Revision: $Id: pcvs-parse.el,v 1.5 2000/12/18 03:17:31 monnier Exp $ +;; Revision: $Id: pcvs-parse.el,v 1.6 2001/03/07 00:17:53 monnier Exp $ ;; This file is part of GNU Emacs. @@ -82,11 +82,11 @@ either a fileinfo or t (if the matched text should be ignored) or nil if it didn't match anything. DONT-CHANGE-DISC just indicates whether the command was changing the disc - or not (useful to tell the difference btween `cvs-examine' and `cvs-update' - ouytput. + or not (useful to tell the difference between `cvs-examine' and `cvs-update' + output. The path names should be interpreted as relative to SUBDIR (defaults to the `default-directory'). -Return a list of collected entries, or t if an error occured." +Return a list of collected entries, or t if an error occurred." (goto-char (point-min)) (let ((fileinfos ()) (cvs-current-dir "") @@ -159,7 +159,8 @@ (and (cvs-match ".*$") (cvs-create-fileinfo 'MESSAGE cvs-current-dir " " - (concat " Unknown msg: '" (cvs-parse-msg) "'") + ;; (concat " Unknown msg: '" + (cvs-parse-msg) ;; "'") :subtype 'ERROR)))))