Changeset 19431 for trunk/Nebulous-Server/t/04_server_replicate_object.t
- Timestamp:
- Sep 8, 2008, 4:18:47 PM (18 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/Nebulous-Server/t/04_server_replicate_object.t
r18452 r19431 3 3 # Copryight (C) 2004-2005 Joshua Hoblitt 4 4 # 5 # $Id: 04_server_replicate_object.t,v 1.1 4 2008-07-10 00:20:02jhoblitt Exp $5 # $Id: 04_server_replicate_object.t,v 1.15 2008-09-09 02:18:47 jhoblitt Exp $ 6 6 7 7 use strict; 8 8 use warnings FATAL => qw( all ); 9 9 10 use Test::More tests => 2 5;10 use Test::More tests => 26; 11 11 12 12 use lib qw( ./t ./lib ); … … 82 82 # key, $volume 83 83 $neb->create_object("foo"); 84 my $uri1 = $neb->replicate_object("foo", " node01");85 my $uri2 = $neb->replicate_object("foo", " node02");84 my $uri1 = $neb->replicate_object("foo", "~node01"); 85 my $uri2 = $neb->replicate_object("foo", "~node02"); 86 86 87 87 { … … 155 155 Test::Nebulous->setup; 156 156 157 { 158 $neb->create_object('foo'); 159 ok($neb->replicate_object('foo', 'bar'),'soft fake storage volume'); 160 } 161 162 Test::Nebulous->setup; 163 157 164 eval { 158 165 $neb->create_object('foo'); 159 $neb->replicate_object('foo', ' bar');166 $neb->replicate_object('foo', '~bar'); 160 167 }; 161 like($@, qr/is valid volume name/, 'storage volume does not exist');168 like($@, qr/is not a valid volume name/, 'storage volume does not exist'); 162 169 163 170 Test::Nebulous->setup;
Note:
See TracChangeset
for help on using the changeset viewer.
