Author: pgollucci Date: Thu Sep 1 21:28:06 2005 New Revision: 266268 URL: http://svn.apache.org/viewcvs?rev=266268&view=rev Log: s/my(/my (/g
Modified: perl/modperl/trunk/t/conf/modperl_extra.pl perl/modperl/trunk/t/conf/post_config_startup.pl Modified: perl/modperl/trunk/t/conf/modperl_extra.pl URL: http://svn.apache.org/viewcvs/perl/modperl/trunk/t/conf/modperl_extra.pl?rev=266268&r1=266267&r2=266268&view=diff ============================================================================== --- perl/modperl/trunk/t/conf/modperl_extra.pl (original) +++ perl/modperl/trunk/t/conf/modperl_extra.pl Thu Sep 1 21:28:06 2005 @@ -112,7 +112,7 @@ PerlPostConfigHandler => \&add_my_version); sub add_my_version { - my($conf_pool, $log_pool, $temp_pool, $s) = @_; + my ($conf_pool, $log_pool, $temp_pool, $s) = @_; $s->add_version_component("world domination series/2.0"); return Apache2::Const::OK; } Modified: perl/modperl/trunk/t/conf/post_config_startup.pl URL: http://svn.apache.org/viewcvs/perl/modperl/trunk/t/conf/post_config_startup.pl?rev=266268&r1=266267&r2=266268&view=diff ============================================================================== --- perl/modperl/trunk/t/conf/post_config_startup.pl (original) +++ perl/modperl/trunk/t/conf/post_config_startup.pl Thu Sep 1 21:28:06 2005 @@ -81,7 +81,7 @@ Apache2::Status->menu_item( 'test_menu' => "Test Menu Entry", sub { - my($r) = @_; + my ($r) = @_; return ["This is just a test entry"]; } ) if Apache2::Module::loaded('Apache2::Status'); @@ -130,7 +130,7 @@ } sub ModPerl::Test::exit_handler { - my($p, $s) = @_; + my ($p, $s) = @_; $s->log->info("Child process pid=$$ is exiting");