===================================================================
RCS file: /cvs/HOPE/Net-OpenAMD/t/local_server.t,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -r1.4 -r1.5
--- HOPE/Net-OpenAMD/t/local_server.t	2010/06/26 17:33:33	1.4
+++ HOPE/Net-OpenAMD/t/local_server.t	2010/06/27 01:52:33	1.5
@@ -1,21 +1,20 @@
 #!perl
-# $AFresh1: local_server.t,v 1.3 2010/06/26 14:14:36 andrew Exp $
-use Test::More;# tests => 75;
+# $AFresh1: local_server.t,v 1.4 2010/06/26 16:33:33 andrew Exp $
+use Test::More;    # tests => 75;
 
 use strict;
 use warnings;
 
 use Net::OpenAMD;
 
-my $have_test_json = 1;
-
 BEGIN {
     use FindBin;
     use lib "$FindBin::Bin";
     use lib "$FindBin::Bin/../../mojo/lib";
 
     eval "use Test::Mojo::Server";
-    plan skip_all => "Test::Mojo::Server required for testing local server" if $@;
+    plan skip_all => "Test::Mojo::Server required for testing local server"
+        if $@;
     require 'network_tests.t';
 }
 
@@ -26,11 +25,10 @@
 my $port = $server->start_daemon_ok('daemon test');
 $server->server_ok('server running');
 
-# XXX tests here
-my $amd = Net::OpenAMD->new();
+my $amd = Net::OpenAMD->new(
+    { base_url => 'http://127.0.0.1:' . $port . '/api', } );
 NetworkTests::run_tests($amd);
 
-$server->stop_server_ok('server stopped');            
-
+$server->stop_server_ok('server stopped');
 
 done_testing();