=================================================================== RCS file: /cvs/HOPE/Net-OpenAMD/t/local_server.t,v retrieving revision 1.7 retrieving revision 1.14 diff -u -r1.7 -r1.14 --- HOPE/Net-OpenAMD/t/local_server.t 2010/06/27 04:59:32 1.7 +++ HOPE/Net-OpenAMD/t/local_server.t 2010/07/17 13:12:32 1.14 @@ -1,6 +1,6 @@ #!perl -# $AFresh1: local_server.t,v 1.6 2010/06/27 03:45:07 andrew Exp $ -use Test::More; # tests => 75; +# $AFresh1: local_server.t,v 1.13 2010/07/13 03:37:47 andrew Exp $ +use Test::More; use strict; use warnings; @@ -13,8 +13,16 @@ use lib "$FindBin::Bin/../../mojo/lib"; eval "use Test::Mojo::Server"; - plan skip_all => "Test::Mojo::Server required for testing local server" - if $@; + if ($@) { + plan skip_all => + "Test::Mojo::Server required for testing local server"; + } + elsif ( $] < 5.01 ) { + plan skip_all => 'test_server.pl requires perl 5.10 or higher'; + } + else { + plan tests => 18; + } require 'network_tests.t'; } @@ -31,4 +39,4 @@ $server->stop_server_ok('server stopped'); -done_testing(); +#done_testing();