diff options
Diffstat (limited to 't/05_object_siblings.t')
| -rw-r--r-- | t/05_object_siblings.t | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/t/05_object_siblings.t b/t/05_object_siblings.t index 4bdec63..173c669 100644 --- a/t/05_object_siblings.t +++ b/t/05_object_siblings.t @@ -10,7 +10,7 @@ test_riak { ok $bucket->allow_multiples, 'multiples set to 1'; { - # test bucket still has multiples sep li + # test bucket still has multiples sep li my $client = new_riak_client($proto); my $bucket = $client->bucket($bucket_name); ok $bucket->allow_multiples, 'bucket multiples set to 1'; @@ -21,7 +21,7 @@ test_riak { is $obj->has_siblings, 0, 'has no sibilings'; is $obj->count_siblings, 0, 'has no sibilings'; } - + for(1..5) { my $client = new_riak_client($proto); my $bucket = $client->bucket($bucket_name); @@ -33,10 +33,10 @@ test_riak { my $obj = $bucket->get('foo'); ok $obj->has_siblings, 'object has siblings'; is $obj->count_siblings, 5, 'got 5 siblings'; - + my @siblings = $obj->siblings; my $obj3 = $obj->sibling(3); - + is_deeply $obj3->data, $obj->sibling(3)->data, 'sibling data matches'; $obj3 = $obj->sibling(3); $obj3->store; |