On Mon, 9 Jul 2001, Geoffrey Young wrote:
> except that my test was dying because modperl_extra.pl didn't exist... I had
> to put an (almost) empty file there to get around this warning...
weird. well the pattern was bogus anyhow, i think this will hold up
better for the moment..
Index: Apache-Test/lib/Apache/TestConfigPerl.pm
===================================================================
RCS file: /home/cvs/modperl-2.0/Apache-Test/lib/Apache/TestConfigPerl.pm,v
retrieving revision 1.13
diff -u -r1.13 TestConfigPerl.pm
--- Apache-Test/lib/Apache/TestConfigPerl.pm 2001/06/26 17:09:46
1.13
+++ Apache-Test/lib/Apache/TestConfigPerl.pm 2001/07/09 16:01:21
@@ -83,7 +83,7 @@
use lib '$serverroot';
for my \$file (qw(modperl_inc.pl modperl_extra.pl)) {
eval { require "conf/\$file" } or
- die if \$@ !~ /^Can.t locate/;
+ die if grep { -e "\$_/conf/\$file" } \@INC;
}
}
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
