2 files changed, 9 insertions, 1 deletions
diff --git a/lib/Net/Riak/Client.pm b/lib/Net/Riak/Client.pm
index dbe3c16..4d14338 100644
--- a/lib/Net/Riak/Client.pm
+++ b/lib/Net/Riak/Client.pm
@@ -38,6 +38,12 @@ has http_response => (
     handles => ['is_success']
 );
 
+has ua_timeout => (
+    is  => 'rw',
+    isa => 'Int',
+    default => 3
+);
+
 with 'Net::Riak::Role::UserAgent';
 with qw/
   Net::Riak::Role::REST
diff --git a/lib/Net/Riak/Role/UserAgent.pm b/lib/Net/Riak/Role/UserAgent.pm
index 123a378..122bf0c 100644
--- a/lib/Net/Riak/Role/UserAgent.pm
+++ b/lib/Net/Riak/Role/UserAgent.pm
@@ -18,7 +18,9 @@ has useragent => (
         $opts{MaxLineLength} = 65_536;
         @LWP::Protocol::http::EXTRA_SOCK_OPTS = %opts;
 
-        my $ua = LWP::UserAgent->new;
+        my $ua = LWP::UserAgent->new(
+            timeout => $self->ua_timeout
+        );
         $ua;
     }
 );