use lib 't/lib';
use Test::More;
use Test::Riak;
test_riak_pbc {
my ($client) = @_;
my $resp = $client->server_info;
ok exists $resp->{node}, 'got server node';
ok exists $resp->{server_version}, 'got server version';
};
use lib 't/lib';
use Test::More;
use Test::Riak;
test_riak_pbc {
my ($client) = @_;
my $resp = $client->server_info;
ok exists $resp->{node}, 'got server node';
ok exists $resp->{server_version}, 'got server version';
};