Since now we have PerlRequire, I suggest the following refactoring:
--- Apache-Test/lib/Apache/TestConfigPerl.pm 2001/08/07 01:38:38
1.15
+++ Apache-Test/lib/Apache/TestConfigPerl.pm 2001/08/08 07:20:43
@@ -75,8 +75,6 @@
}
-my %startup_pl = (1 => 'PerlRequire', 2 => 'PerlSwitches');
-
sub startup_pl_code {
my $self = shift;
my $serverroot = $self->{vars}->{serverroot};
@@ -120,8 +118,7 @@
close $fh;
}
- my $directive = $self->server->version_of(\%startup_pl);
- $self->postamble($directive => $startup_pl);
+ $self->postamble(PerlRequire => $startup_pl);
}
my %sethandler_modperl = (1 => 'perl-script', 2 => 'modperl');
_____________________________________________________________________
Stas Bekman JAm_pH -- Just Another mod_perl Hacker
http://stason.org/ mod_perl Guide http://perl.apache.org/guide
mailto:[EMAIL PROTECTED] http://apachetoday.com http://eXtropia.com/
http://singlesheaven.com http://perl.apache.org http://perlmonth.com/
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
