===================================================================
RCS file: /cvs/HOPE/Net-OpenAMD/t/network_tests.t,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -r1.7 -r1.8
--- HOPE/Net-OpenAMD/t/network_tests.t	2010/06/30 19:04:20	1.7
+++ HOPE/Net-OpenAMD/t/network_tests.t	2010/07/13 01:14:43	1.8
@@ -1,17 +1,18 @@
 #!perl
 package NetworkTests;
 
-# $AFresh1: network_tests.t,v 1.6 2010/06/30 05:30:17 andrew Exp $
+# $AFresh1: network_tests.t,v 1.7 2010/06/30 18:04:20 andrew Exp $
 
 use strict;
 use warnings;
 
 use Test::More;
 use Net::OpenAMD;
+use Data::Dumper;
 
 if ( !caller() ) {
     if ( $ENV{'NETWORK_TESTS'} ) {
-        plan tests => 11;
+        plan tests => 13;
     }
     else {
         plan skip_all =>
@@ -22,9 +23,9 @@
         location => [
             {   args   => undef,
                 expect => [
-                    {   'y'    => '7.33745396305',
+                    {   'y'    => '43.4861220266',
                         'user' => 'user6',
-                        'x'    => '41.0283030135'
+                        'x'    => '18.2468971683'
                     },
                     {   'y'    => '36.5212503999',
                         'user' => 'user7',
@@ -104,10 +105,18 @@
                     }
                 ],
             },
+            {   args   => [ user => 'user0' ],
+                expect => [],
+            },
         ],
         speakers => [
             {   args   => undef,
                 expect => [
+                    [   '9000',
+                        {   'name' => 'The Cheshire Catalyst',
+                            'bio'  => 'Jacob\'s bio'
+                        }
+                    ],
                     [   'user0',
                         {   'name' => 'Jacob',
                             'bio'  => 'Jacob\'s bio'