[svn:modperl-modules] rev 139 - in Apache-Scoreboard-1.0/trunk/t: external response/TestInternal

Author: stas
Date: Fri Feb  4 19:37:28 2005
New Revision: 139

Modified:
   Apache-Scoreboard-1.0/trunk/t/external/basic.t
   Apache-Scoreboard-1.0/trunk/t/response/TestInternal/basic.pm
Log:
cleanup


Modified: Apache-Scoreboard-1.0/trunk/t/external/basic.t
==============================================================================
--- Apache-Scoreboard-1.0/trunk/t/external/basic.t	(original)
+++ Apache-Scoreboard-1.0/trunk/t/external/basic.t	Fri Feb  4 19:37:28 2005
@@ -19,9 +19,6 @@
 plan tests => $tests_local + $tests_common;
 
 my $cfg = Apache::Test::config();
-my $vars = $cfg->{vars};
-
-my $store_file = catfile $vars->{documentroot}, "scoreboard";
 my $hostport = Apache::TestRequest::hostport($cfg);
 my $retrieve_url = "http://$hostport/scoreboard";
 

Modified: Apache-Scoreboard-1.0/trunk/t/response/TestInternal/basic.pm
==============================================================================
--- Apache-Scoreboard-1.0/trunk/t/response/TestInternal/basic.pm	(original)
+++ Apache-Scoreboard-1.0/trunk/t/response/TestInternal/basic.pm	Fri Feb  4 19:37:28 2005
@@ -1,5 +1,8 @@
 package TestInternal::basic;
 
+use strict;
+use warnings FATAL => 'all';
+
 use Apache::Test;
 use Apache::TestRequest ();
 use Apache::TestTrace;
@@ -14,7 +17,7 @@
 my $tests_local  = 0;
 my $tests_common = MyTest::Common::num_of_tests();
 
-my $store_file = catfile $vars->{documentroot}, "scoreboard";
+my $cfg = Apache::Test::config();
 my $hostport = Apache::TestRequest::hostport($cfg);
 my $retrieve_url = "http://$hostport/scoreboard";