From 79bea382fd2c0753ca9ace79a11bb74c9a1d722b Mon Sep 17 00:00:00 2001 From: Robin Edwards Date: Wed, 20 Apr 2011 14:38:43 +0100 Subject: merged pbc branch to master --- t/10_list_buckets.t | 15 +++++++++++++++ 1 file changed, 15 insertions(+) create mode 100644 t/10_list_buckets.t (limited to 't/10_list_buckets.t') diff --git a/t/10_list_buckets.t b/t/10_list_buckets.t new file mode 100644 index 0000000..eaedb4b --- /dev/null +++ b/t/10_list_buckets.t @@ -0,0 +1,15 @@ +use lib 't/lib'; +use Test::More; +use Test::Riak; + +test_riak { + my ($client, $bucket_name) = @_; + + my $bucket = $client->bucket($bucket_name."_1"); + ok $bucket->new_object( "bob" => { 'name' => 'bob', age => 23 } )->store, 'store'; + + $bucket = $client->bucket($bucket_name."_2"); + ok $bucket->new_object( "bob" => { 'name' => 'bob', age => 23 } )->store, 'store'; + + ok scalar( $client->all_buckets) >= 2, 'listed buckets'; +}; -- cgit 1.4.1