From ea86098377868c190eb19f6cb33fbc82e62901ac Mon Sep 17 00:00:00 2001 From: "slamm%netscape.com" Date: Mon, 11 Oct 1999 19:40:51 +0000 Subject: [PATCH] Skip attic files. git-svn-id: svn://10.0.0.236/trunk@50353 18797224-902f-48f8-a5cc-f745e15eee43 --- mozilla/webtools/tinderbox/warnings-test.pl | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/mozilla/webtools/tinderbox/warnings-test.pl b/mozilla/webtools/tinderbox/warnings-test.pl index f06c2d79e63..31fc6ebbc2e 100644 --- a/mozilla/webtools/tinderbox/warnings-test.pl +++ b/mozilla/webtools/tinderbox/warnings-test.pl @@ -193,10 +193,11 @@ sub expand_cvs_modules { } } } } sub find_cvs_files { - $File::Find::prune = 1 if /.OBJ$/ or /^CVS$/; + $File::Find::prune = 1 if /.OBJ$/ or /^CVS$/ or /^Attic$/; if (-d $_) { $File::Find::prune = 1 if /$exclude_pat/o or $seen{$File::Find::name}; $seen{$File::Find::name} = 1; + return; } my $dir = $File::Find::dir; $dir =~ s|^$cvsroot/||o;