geoff 2004/04/28 07:55:42
Modified: perl-framework/Apache-Test/lib/Apache TestConfigPerl.pm
Log:
prevent 'Empty compile time value given to use lib' warnings
Revision Changes Path
1.88 +1 -0
httpd-test/perl-framework/Apache-Test/lib/Apache/TestConfigPerl.pm
Index: TestConfigPerl.pm
===================================================================
RCS file:
/home/cvs/httpd-test/perl-framework/Apache-Test/lib/Apache/TestConfigPerl.pm,v
retrieving revision 1.87
retrieving revision 1.88
diff -u -r1.87 -r1.88
--- TestConfigPerl.pm 7 Apr 2004 21:51:36 -0000 1.87
+++ TestConfigPerl.pm 28 Apr 2004 14:55:42 -0000 1.88
@@ -180,6 +180,7 @@
my $include_pl = catfile $self->{vars}->{t_conf}, 'modperl_inc.pl';
my $fh = $self->genfile($include_pl);
for (reverse @$inc) {
+ next unless $_;
print $fh "use lib '$_';\n";
}
my $fixup = Apache::TestConfig->modperl_2_inc_fixup();