Author: stas Date: Mon Dec 20 14:06:15 2004 New Revision: 122885 URL: http://svn.apache.org/viewcvs?view=rev&rev=122885 Log: cleanups
Modified: perl/modperl/trunk/t/vhost/config.t perl/modperl/trunk/t/vhost/log.t Modified: perl/modperl/trunk/t/vhost/config.t Url: http://svn.apache.org/viewcvs/perl/modperl/trunk/t/vhost/config.t?view=diff&rev=122885&p1=perl/modperl/trunk/t/vhost/config.t&r1=122884&p2=perl/modperl/trunk/t/vhost/config.t&r2=122885 ============================================================================== --- perl/modperl/trunk/t/vhost/config.t (original) +++ perl/modperl/trunk/t/vhost/config.t Mon Dec 20 14:06:15 2004 @@ -1,12 +1,10 @@ # the handler is configured in modperl_extra.pl via # Apache->server->add_config +use Apache::Test; use Apache::TestUtil; use Apache::TestRequest 'GET'; -my $config = Apache::Test::config(); -my $vars = $config->{vars}; - my $module = 'TestVhost::config'; my $url = Apache::TestRequest::module2url($module); @@ -18,9 +16,9 @@ } else { if ($res->code == 404) { - my $documentroot = $vars->{documentroot}; + my $docroot = Apache::Test::vars('documentroot'); die "this test gets its <Location> configuration added via " . - "$documentroot/vhost/startup.pl, this could be the cause " . + "$docroot/vhost/startup.pl, this could be the cause " . "of the failure"; } else { Modified: perl/modperl/trunk/t/vhost/log.t Url: http://svn.apache.org/viewcvs/perl/modperl/trunk/t/vhost/log.t?view=diff&rev=122885&p1=perl/modperl/trunk/t/vhost/log.t&r1=122884&p2=perl/modperl/trunk/t/vhost/log.t&r2=122885 ============================================================================== --- perl/modperl/trunk/t/vhost/log.t (original) +++ perl/modperl/trunk/t/vhost/log.t Mon Dec 20 14:06:15 2004 @@ -1,9 +1,6 @@ use Apache::TestUtil; use Apache::TestRequest 'GET_BODY_ASSERT'; -my $config = Apache::Test::config(); -my $vars = $config->{vars}; - my $module = 'TestVhost::log'; my $url = Apache::TestRequest::module2url($module);