=================================================================== RCS file: /cvs/HOPE/Net-OpenAMD/t/local_server.t,v retrieving revision 1.5 retrieving revision 1.9 diff -u -r1.5 -r1.9 --- HOPE/Net-OpenAMD/t/local_server.t 2010/06/27 01:52:33 1.5 +++ HOPE/Net-OpenAMD/t/local_server.t 2010/06/28 21:40:38 1.9 @@ -1,6 +1,6 @@ #!perl -# $AFresh1: local_server.t,v 1.4 2010/06/26 16:33:33 andrew Exp $ -use Test::More; # tests => 75; +# $AFresh1: local_server.t,v 1.8 2010/06/28 20:34:14 andrew Exp $ +use Test::More; use strict; use warnings; @@ -13,8 +13,12 @@ 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"; + } + else { + plan tests => 15; + } require 'network_tests.t'; } @@ -26,9 +30,9 @@ $server->server_ok('server running'); my $amd = Net::OpenAMD->new( - { base_url => 'http://127.0.0.1:' . $port . '/api', } ); + { base_uri => 'http://127.0.0.1:' . $port . '/api/', } ); NetworkTests::run_tests($amd); $server->stop_server_ok('server stopped'); -done_testing(); +#done_testing();