You are viewing a plain text version of this content. The canonical link for it is here.
Posted to dev@perl.apache.org by Stas Bekman <st...@stason.org> on 2001/08/08 09:24:43 UTC

cleaning up special handling PerlRequire/PerlSwitches

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:stas@stason.org   http://apachetoday.com http://eXtropia.com/
http://singlesheaven.com http://perl.apache.org http://perlmonth.com/



---------------------------------------------------------------------
To unsubscribe, e-mail: dev-unsubscribe@perl.apache.org
For additional commands, e-mail: dev-help@perl.apache.org


Re: cleaning up special handling PerlRequire/PerlSwitches

Posted by Doug MacEachern <do...@covalent.net>.
On Wed, 8 Aug 2001, Stas Bekman wrote:

> Since now we have PerlRequire, I suggest the following refactoring:

+1


---------------------------------------------------------------------
To unsubscribe, e-mail: dev-unsubscribe@perl.apache.org
For additional commands, e-mail: dev-help@perl.apache.org