diff options
| author | Stefan Monnier | 2002-06-24 22:49:06 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2002-06-24 22:49:06 +0000 |
| commit | ed297fd62421457eb599b77af211fcfeb834724d (patch) | |
| tree | a7a5e2b5e1ab1dd30b68a6bddb626674a4176722 | |
| parent | 2d588beb819b2f8444eac522f04bc95656fcfa3b (diff) | |
| download | emacs-ed297fd62421457eb599b77af211fcfeb834724d.tar.gz emacs-ed297fd62421457eb599b77af211fcfeb834724d.zip | |
(cvs-parse-table): Handle `nothing known about' with more care.
| -rw-r--r-- | lisp/pcvs-parse.el | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/lisp/pcvs-parse.el b/lisp/pcvs-parse.el index bc577d6e8c8..607a6fa6f06 100644 --- a/lisp/pcvs-parse.el +++ b/lisp/pcvs-parse.el | |||
| @@ -1,10 +1,11 @@ | |||
| 1 | ;;; pcvs-parse.el --- the CVS output parser | 1 | ;;; pcvs-parse.el --- the CVS output parser |
| 2 | 2 | ||
| 3 | ;; Copyright (C) 1991, 92, 93, 94, 95, 96, 97, 98, 99, 2000 Free Software Foundation, Inc. | 3 | ;; Copyright (C) 1991,92,93,94,95,96,97,98,99,2000,2002 |
| 4 | ;; Free Software Foundation, Inc. | ||
| 4 | 5 | ||
| 5 | ;; Author: Stefan Monnier <monnier@cs.yale.edu> | 6 | ;; Author: Stefan Monnier <monnier@cs.yale.edu> |
| 6 | ;; Keywords: pcl-cvs | 7 | ;; Keywords: pcl-cvs |
| 7 | ;; Revision: $Id: pcvs-parse.el,v 1.10 2001/09/24 16:39:23 monnier Exp $ | 8 | ;; Revision: $Id: pcvs-parse.el,v 1.11 2002/03/17 20:48:14 monnier Exp $ |
| 8 | 9 | ||
| 9 | ;; This file is part of GNU Emacs. | 10 | ;; This file is part of GNU Emacs. |
| 10 | 11 | ||
| @@ -354,7 +355,8 @@ The remaining KEYS are passed directly to `cvs-create-fileinfo'." | |||
| 354 | ;; just a note | 355 | ;; just a note |
| 355 | (cvs-match "use '.+ commit' to \\sw+ th\\sw+ files? permanently$") | 356 | (cvs-match "use '.+ commit' to \\sw+ th\\sw+ files? permanently$") |
| 356 | ;; [add,status] followed by a more complete status description anyway | 357 | ;; [add,status] followed by a more complete status description anyway |
| 357 | (cvs-match "nothing known about .*$") | 358 | (and (cvs-match "nothing known about \\(.*\\)$" (path 1)) |
| 359 | (cvs-parsed-fileinfo 'DEAD path 'trust)) | ||
| 358 | ;; [update] problem with patch | 360 | ;; [update] problem with patch |
| 359 | (cvs-match "checksum failure after patch to .*; will refetch$") | 361 | (cvs-match "checksum failure after patch to .*; will refetch$") |
| 360 | (cvs-match "refetching unpatchable files$") | 362 | (cvs-match "refetching unpatchable files$") |