Return-Path: Delivered-To: apmail-perl-modperl-cvs-archive@www.apache.org Received: (qmail 46347 invoked from network); 20 Dec 2004 22:06:21 -0000 Received: from hermes.apache.org (HELO mail.apache.org) (209.237.227.199) by minotaur-2.apache.org with SMTP; 20 Dec 2004 22:06:21 -0000 Received: (qmail 58489 invoked by uid 500); 20 Dec 2004 22:06:20 -0000 Delivered-To: apmail-perl-modperl-cvs-archive@perl.apache.org Received: (qmail 58434 invoked by uid 500); 20 Dec 2004 22:06:19 -0000 Mailing-List: contact modperl-cvs-help@perl.apache.org; run by ezmlm Precedence: bulk list-help: list-unsubscribe: list-post: Reply-To: dev@perl.apache.org Delivered-To: mailing list modperl-cvs@perl.apache.org Received: (qmail 58398 invoked by uid 99); 20 Dec 2004 22:06:18 -0000 X-ASF-Spam-Status: No, hits=-9.8 required=10.0 tests=ALL_TRUSTED,NO_REAL_NAME X-Spam-Check-By: apache.org Date: 20 Dec 2004 22:06:17 -0000 Message-ID: <20041220220617.46307.qmail@minotaur.apache.org> From: stas@apache.org To: modperl-cvs@perl.apache.org Subject: svn commit: r122885 - /perl/modperl/trunk/t/vhost/config.t /perl/modperl/trunk/t/vhost/log.t MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 X-Virus-Checked: Checked X-Spam-Rating: minotaur-2.apache.org 1.6.2 0/1000/N 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 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);