version 1.6, 2010/06/27 04:45:07 |
version 1.8, 2010/06/28 21:34:14 |
|
|
#!perl |
#!perl |
# $AFresh1: local_server.t,v 1.5 2010/06/27 00:52:33 andrew Exp $ |
# $AFresh1: local_server.t,v 1.7 2010/06/27 03:59:32 andrew Exp $ |
use Test::More; # tests => 75; |
use Test::More tests => 15; |
|
|
use strict; |
use strict; |
use warnings; |
use warnings; |
|
|
$server->server_ok('server running'); |
$server->server_ok('server running'); |
|
|
my $amd = Net::OpenAMD->new( |
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); |
NetworkTests::run_tests($amd); |
|
|
$server->stop_server_ok('server stopped'); |
$server->stop_server_ok('server stopped'); |
|
|
done_testing(); |
#done_testing(); |