# HG changeset patch # User Stefan Monnier # Date 983924273 0 # Node ID 4d41a2e49d397b83140ef004482d0248d967f375 # Parent c0360458748f9b3f41604657670df354c55f9f95 (cvs-parse-table): Add another ignored message. diff -r c0360458748f -r 4d41a2e49d39 lisp/pcvs-parse.el --- a/lisp/pcvs-parse.el Wed Mar 07 00:16:29 2001 +0000 +++ b/lisp/pcvs-parse.el Wed Mar 07 00:17:53 2001 +0000 @@ -4,7 +4,7 @@ ;; Author: Stefan Monnier ;; Keywords: pcl-cvs -;; Revision: $Id: pcvs-parse.el,v 1.4 2000/12/06 19:52:39 fx Exp $ +;; Revision: $Id: pcvs-parse.el,v 1.5 2000/12/18 03:17:31 monnier Exp $ ;; This file is part of GNU Emacs. @@ -25,6 +25,12 @@ ;;; Commentary: +;;; Bugs: + +;; - when merging a modified file, if the merge says that the file already +;; contained in the changes, it marks the file as `up-to-date' although +;; it might still contain further changes. +;; Example: merging a zero-change commit. ;;; Code: @@ -352,6 +358,8 @@ (cvs-match "refetching unpatchable files$") ;; [commit] (cvs-match "Rebuilding administrative file database$") + ;; ??? + (cvs-match "--> Using per-directory sticky tag `.*'") ;; CVS is running a *info program. (and @@ -408,6 +416,8 @@ "\\) already contains the differences between .*$") (path 1) (type '(UP-TO-DATE . MERGED))) t) + ;; FIXME: PATH might not be set yet. Sometimes the only path + ;; information is in `RCS file: ...' (yuck!!). (cvs-parsed-fileinfo (if dont-change-disc 'NEED-MERGE (or type '(MODIFIED . MERGED))) path nil :merge (cons base-rev head-rev))))))