comparison lisp/pcvs-parse.el @ 50957:4f526428ef19

(cvs-parse-table): `New directory' messages include the full path.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Mon, 12 May 2003 18:14:51 +0000
parents fa1c848a9779
children b51c3d855e30
comparison
equal deleted inserted replaced
50956:510251277445 50957:4f526428ef19
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,2002 3 ;; Copyright (C) 1991,92,93,94,95,96,97,98,99,2000,02,2003
4 ;; Free Software Foundation, Inc. 4 ;; Free Software Foundation, Inc.
5 5
6 ;; Author: Stefan Monnier <monnier@cs.yale.edu> 6 ;; Author: Stefan Monnier <monnier@cs.yale.edu>
7 ;; Keywords: pcl-cvs 7 ;; Keywords: pcl-cvs
8 8
264 264
265 ;; [-n update] A new (or pruned) directory appeared but isn't traversed 265 ;; [-n update] A new (or pruned) directory appeared but isn't traversed
266 (and 266 (and
267 (cvs-match "New directory `\\(.*\\)' -- ignored$" (dir 1)) 267 (cvs-match "New directory `\\(.*\\)' -- ignored$" (dir 1))
268 ;; (cvs-parsed-fileinfo 'MESSAGE " " (file-name-as-directory dir)) 268 ;; (cvs-parsed-fileinfo 'MESSAGE " " (file-name-as-directory dir))
269 (cvs-parsed-fileinfo '(NEED-UPDATE . NEW-DIR) dir)) 269 (cvs-parsed-fileinfo '(NEED-UPDATE . NEW-DIR) dir t))
270 270
271 ;; File removed, since it is removed (by third party) in repository. 271 ;; File removed, since it is removed (by third party) in repository.
272 (and 272 (and
273 (cvs-or 273 (cvs-or
274 (cvs-match "warning: \\(.*\\) is not (any longer) pertinent$" (file 1)) 274 (cvs-match "warning: \\(.*\\) is not (any longer) pertinent$" (file 1))