diff options
Diffstat (limited to '')
| -rw-r--r-- | lib/Net/Riak.pm | 9 |
1 files changed, 1 insertions, 8 deletions
diff --git a/lib/Net/Riak.pm b/lib/Net/Riak.pm index bd76cce..fa54e2e 100644 --- a/lib/Net/Riak.pm +++ b/lib/Net/Riak.pm @@ -13,7 +13,7 @@ has client => ( is => 'rw', isa => 'Net::Riak::Client', required => 1, - handles => [qw/request useragent/] + handles => [qw/request useragent is_alive/] ); sub BUILDARGS { @@ -29,13 +29,6 @@ sub bucket { $bucket; } -sub is_alive { - my $self = shift; - my $request = $self->request('GET', ['ping']); - my $response = $self->useragent->request($request); - $response->is_success ? return 1 : return 0; -} - 1; =head1 SYNOPSIS |