Changeset 4638 for trunk/Nebulous-Server/t

Timestamp:

Jul 27, 2005, 5:48:41 PM (21 years ago)

Author:

jhoblitt

Message:

->open( $foo, 'write') is not allowed when object has multiple instances

File:

• trunk/Nebulous-Server/t/18_client_open.t (modified) (3 diffs)

trunk/Nebulous-Server/t/18_client_open.t

@@ -3 +3 @@
 # Copryight (C) 2004-2005  Joshua Hoblitt
 #
-# $Id: 18_client_open.t,v 1.2 2005-06-30 02:35:06 jhoblitt Exp $
+# $Id: 18_client_open.t,v 1.3 2005-07-28 03:48:41 jhoblitt Exp $
 
 use strict;
@@ -10 +10 @@
 use Apache::Test qw( -withtestmore );
 
-plan tests => 7;
+plan tests => 8;
 
 use lib qw( ./t ./lib );
@@ -68 +68 @@
 Test::Nebulous->setup;
 
+{
+    my $neb = Nebulous::Client->new(
+        proxy => "http://$hostport/nebulous",
+    );
+    $neb->create( "foo" );
+    $neb->replicate( "foo" );
+
+    is( $neb->open( "foo", 'write' ), undef,
+        "write to object with multiple instances" );
+}
+
+Test::Nebulous->setup;
+
 eval {
     my $neb = Nebulous::Client->new(