Changeset 4440 for trunk/Nebulous-Server/t/apache_04_server_replicate_object.x

Timestamp:

Jun 29, 2005, 4:35:06 PM (21 years ago)

Author:

jhoblitt

Message:

rename PS::IPP::IData -> Nebulous

File:

• trunk/Nebulous-Server/t/apache_04_server_replicate_object.x (modified) (4 diffs)

trunk/Nebulous-Server/t/apache_04_server_replicate_object.x

@@ -11 +11 @@
 
 use Apache::TestUtil;
-use PS::IPP::IData::Util qw( :standard );
+use Nebulous::Util qw( :standard );
 use SOAP::Lite;
-use Test::IData;
+use Test::Nebulous;
 
 my $hostport = Apache::Test::config()->{ 'hostport' };
-my $idata = SOAP::Lite->new(
-    proxy   => "http://$hostport/idata",
-    uri     => "http://pan-starrs.ifa.hawaii.edu/PS/IPP/IData/Server",
+my $neb = SOAP::Lite->new(
+    proxy   => "http://$hostport/nebulous",
+    uri     => "http://pan-starrs.ifa.hawaii.edu/PS/IPP/Nebulous/Server",
 );
 
-Test::IData->setup;
+Test::Nebulous->setup;
 
 {
     # key
-    $idata->create_object( "foo" );
-    my $uri = $idata->replicate_object( "foo" )->result;
+    $neb->create_object( "foo" );
+    my $uri = $neb->replicate_object( "foo" )->result;
 
     ok( -e _get_file_path( $uri ), "file exists" );
@@ -33 +33 @@
 }
 
-Test::IData->setup;
+Test::Nebulous->setup;
 
 {
     # key, $volume
-    $idata->create_object( "foo" );
-    my $uri = $idata->replicate_object( "foo", "node01" )->result;
+    $neb->create_object( "foo" );
+    my $uri = $neb->replicate_object( "foo", "node01" )->result;
 
     ok( -e _get_file_path( $uri ), "file exists" );
@@ -45 +45 @@
 }
 
-Test::IData->setup;
+Test::Nebulous->setup;
 
 {
     # key, $volume
-    $idata->create_object( "foo" );
-    my $uri1 = $idata->replicate_object( "foo", "node01" )->result;
-    my $uri2 = $idata->replicate_object( "foo", "node02" )->result;
+    $neb->create_object( "foo" );
+    my $uri1 = $neb->replicate_object( "foo", "node01" )->result;
+    my $uri2 = $neb->replicate_object( "foo", "node02" )->result;
 
     ok( -e _get_file_path( $uri1 ), "file exists" );
@@ -60 +60 @@
 }
 
-Test::IData->setup;
+Test::Nebulous->setup;
 
 {
-    my $response = $idata->replicate_object();
+    my $response = $neb->replicate_object();
 
     like( $response->faultstring, qr/1 - 2 were expected/, "no params" );
 }
 
-Test::IData->setup;
+Test::Nebulous->setup;
 
 {
-    my $response = $idata->replicate_object( 1, 2, 3 );
+    my $response = $neb->replicate_object( 1, 2, 3 );
 
     like( $response->faultstring, qr/1 - 2 were expected/, "too many params" );
 }
 
-Test::IData->setup;
+Test::Nebulous->setup;
 
 {
-    my $response = $idata->replicate_object( "foo" );
+    my $response = $neb->replicate_object( "foo" );
 
     like( $response->faultstring, qr/storage object does not exist/, "storage object does not exist" );
 }
 
-Test::IData->cleanup;
+Test::Nebulous->cleanup;