Date: Thu, 23 Sep 1999 21:23:52 +0200 From: Anton Berezin <tobez@plab.ku.dk> To: Darryl Okahata <darrylo@sr.hp.com> Cc: Matthew Dillon <dillon@apollo.backplane.com>, Poul-Henning Kamp <phk@critter.freebsd.dk>, freebsd-current@FreeBSD.ORG Subject: Re: ccd build failure Message-ID: <19990923212352.A40492@lion.plab.ku.dk> In-Reply-To: <199909231846.LAA04038@mina.sr.hp.com> References: <199909231846.LAA04038@mina.sr.hp.com>
next in thread | previous in thread | raw e-mail | index | archive | help
On Thu, Sep 23, 1999 at 11:46:38AM -0700, Darryl Okahata wrote:
> I'd like to submit the attached perl script, which lists the status of
> cvs-controlled files. In particular, it's very useful for determining
> which files have been modified but not committed
With the following patch this scripts becomes even more useful (properly
handles situations when the file is missing):
--- /home/tobez/cvsinfo Thu Sep 23 21:19:53 1999
+++ cvsinfo Thu Sep 23 21:19:22 1999
@@ -69,7 +69,7 @@
$cmd = "cvs status -l";
open(IN, "$cmd 2>&1 |") || die "$!";
while (<IN>) {
- if (/^File:\s+([^\s]+)\s+Status:\s+(.+)$/i){
+ if (/^File:\s+(?:no file\s+)?([^\s]+)\s+Status:\s+(.+)$/i){
$file = $1;
$status = $2;
if ($all_status || $status ne 'Up-to-date') {
Cheers,
--
Anton Berezin <tobez@plab.ku.dk>
The Protein Laboratory, University of Copenhagen
To Unsubscribe: send mail to majordomo@FreeBSD.org
with "unsubscribe freebsd-current" in the body of the message
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?19990923212352.A40492>