Changeset 13255

Timestamp:

May 4, 2007, 2:02:53 PM (19 years ago)

Author:

jhoblitt

Message:

debugging trace updates
change the docs to indicate that ->create() returns a URI

Location:

trunk/Nebulous/lib/Nebulous

Files:

• Client.pm (modified) (4 diffs)
• Client.pod (modified) (2 diffs)

trunk/Nebulous/lib/Nebulous/Client.pm

@@ -1 +1 @@
 # Copyright (c) 2004  Joshua Hoblitt
 #
-# $Id: Client.pm,v 1.32 2007-05-04 23:41:35 jhoblitt Exp $
+# $Id: Client.pm,v 1.33 2007-05-05 00:02:53 jhoblitt Exp $
 
 package Nebulous::Client;
@@ -113 +113 @@
 
     my $res = $response->result;
-    $log->debug( "server respone $res" );
+    $log->debug( "server response: $res" );
 
     my $uri = URI->new($res);
-    my $filename = $uri->file;
-    $log->debug( "local filename is $filename" );
+    $log->debug( "URI is: $uri" );
 
     $log->debug( "leaving" );
@@ -150 +149 @@
 
     my $res = $response->result;
-    $log->debug( "server response $res" );
+    $log->debug( "server response: $res" );
 
     my $uri = URI->new($res);
-    my $filename = $uri->file;
-    $log->debug( "local filename is $filename" );
+    $log->debug( "URI is: $uri" );
 
     my $fh;
@@ -204 +202 @@
 
     my $res = $response->result;
-    $log->debug( "server response $res" );
+    $log->debug( "server response: $res" );
 
     my $uri = URI->new($res);
-    my $filename = $uri->file;
-    $log->debug( "local filename is $filename" );
+    $log->debug( "URI is: $uri" );
 
     my $new_fh;

trunk/Nebulous/lib/Nebulous/Client.pod

@@ -13 +13 @@
     );
 
-    my $filename = $neb->create( "key", 0, "node01", "example" );
+    my $uri = $neb->create( "key", 0, "node01", "example" );
     my $fh = $neb->open_create( "key", 0, "node01", "example" );
     $neb->replicate( "key", "node01" );
@@ -117 +117 @@
 =back
 
-Returns a local filename or C<undef> on failure.
+Returns a URI or C<undef> on failure.