stas 01/11/21 19:16:19
Modified: perl-framework/Apache-Test/lib/Apache TestConfig.pm
Log:
- configure any *.in file found in t/conf
Revision Changes Path
1.88 +10 -2
httpd-test/perl-framework/Apache-Test/lib/Apache/TestConfig.pm
Index: TestConfig.pm
===================================================================
RCS file:
/home/cvs/httpd-test/perl-framework/Apache-Test/lib/Apache/TestConfig.pm,v
retrieving revision 1.87
retrieving revision 1.88
diff -u -r1.87 -r1.88
--- TestConfig.pm 2001/11/17 02:43:13 1.87
+++ TestConfig.pm 2001/11/22 03:16:19 1.88
@@ -885,7 +885,7 @@
my(@extra_conf, @conf_in, @conf_files);
finddepth(sub {
- return unless /\.conf\.in$/;
+ return unless /\.in$/;
push @conf_in, catdir $File::Find::dir, $_;
}, $self->{vars}->{t_conf});
@@ -963,7 +963,15 @@
if (my $extra_conf = $self->generate_extra_conf) {
for my $file (@$extra_conf) {
- $self->postamble(Include => qq("$file"));
+ if ($file =~ /\.conf$/) {
+ $self->postamble(Include => qq("$file"));
+ }
+ elsif ($file =~ /\.pl$/) {
+ $self->postamble(PerlRequire => qq("$file"));
+ }
+ else {
+ # nothing yet
+ }
}
}