[Jifty-commit] r3776 - in Test-WWW-Declare: lib/Test/WWW/Declare t

jifty-commit at lists.jifty.org jifty-commit at lists.jifty.org
Fri Aug 3 16:10:15 EDT 2007


Author: sartak
Date: Fri Aug  3 16:10:15 2007
New Revision: 3776

Modified:
   Test-WWW-Declare/   (props changed)
   Test-WWW-Declare/lib/Test/WWW/Declare/Tester.pm
   Test-WWW-Declare/t/01-basic.t
   Test-WWW-Declare/t/02-skip.t

Log:
 r29876 at caladan:  sartak | 2007-08-03 16:10:04 -0400
 "use Test::WWW::Declare::Tester tests => 9;"


Modified: Test-WWW-Declare/lib/Test/WWW/Declare/Tester.pm
==============================================================================
--- Test-WWW-Declare/lib/Test/WWW/Declare/Tester.pm	(original)
+++ Test-WWW-Declare/lib/Test/WWW/Declare/Tester.pm	Fri Aug  3 16:10:15 2007
@@ -56,13 +56,23 @@
 }
 
 package Test::WWW::Declare::Tester;
-use base 'Exporter';
+use Test::Tester;
+use Test::WWW::Declare;
+use base 'Test::More';
+
+our $VERSION = '0.00';
 our @EXPORT = qw($PORT $SERVER $PID);
 
 our $PORT = 12321;
 our $SERVER = Test::WWW::Declare::Tester::Server->new($PORT);
 our $PID = $SERVER->background or die "Cannot start the server";
 
+sub import_extra {
+    Test::Tester->export_to_level(2);
+    Test::WWW::Declare->export_to_level(2);
+    Test::More->export_to_level(2);
+}
+
 END {
     kill(9, $PID);
 }

Modified: Test-WWW-Declare/t/01-basic.t
==============================================================================
--- Test-WWW-Declare/t/01-basic.t	(original)
+++ Test-WWW-Declare/t/01-basic.t	Fri Aug  3 16:10:15 2007
@@ -1,7 +1,5 @@
 #!perl
-use Test::Tester tests => 5;
-use Test::WWW::Declare;
-use Test::WWW::Declare::Tester;
+use Test::WWW::Declare::Tester tests => 5;
 use warnings;
 use strict;
 

Modified: Test-WWW-Declare/t/02-skip.t
==============================================================================
--- Test-WWW-Declare/t/02-skip.t	(original)
+++ Test-WWW-Declare/t/02-skip.t	Fri Aug  3 16:10:15 2007
@@ -1,7 +1,5 @@
 #!perl
-use Test::Tester tests => 9;
-use Test::WWW::Declare;
-use Test::WWW::Declare::Tester;
+use Test::WWW::Declare::Tester tests => 9;
 use warnings;
 use strict;
 


More information about the Jifty-commit mailing list