From 79bea382fd2c0753ca9ace79a11bb74c9a1d722b Mon Sep 17 00:00:00 2001
From: Robin Edwards <robin.ge@gmail.com>
Date: Wed, 20 Apr 2011 14:38:43 +0100
Subject: merged pbc branch to master

---
 t/client.t | 20 ++++++++++++++++++++
 1 file changed, 20 insertions(+)
 create mode 100644 t/client.t

(limited to 't/client.t')

diff --git a/t/client.t b/t/client.t
new file mode 100644
index 0000000..f90621e
--- /dev/null
+++ b/t/client.t
@@ -0,0 +1,20 @@
+use strict;
+use warnings;
+
+use Test::More;
+
+use Net::Riak;
+use Net::Riak::Client;
+
+my $riak = Net::Riak->new(r => 3, w => 4, dw => 5);
+is $riak->client->r,  3, 'r set to 3';
+is $riak->client->dw, 5, 'r set to 5';
+
+$riak = Net::Riak::Client->new(r => 5, w => 4, dw => 3);
+is $riak->r,  5, 'r set to 5';
+is $riak->dw, 3, 'r set to 3';
+
+ok $riak->client_id, 'id set';
+
+done_testing;
+
-- 
cgit 1.4.1