From b45055cfcd716f84ce8fc7a0e5f9dcf3440ae57e Mon Sep 17 00:00:00 2001
From: Ralf Ertzinger <ralf@skytale.net>
Date: Sat, 11 Feb 2012 15:53:41 +0100
Subject: [PATCH] Base: lower timeout for default UserAgent object

---
 videosite/Base.pm | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/videosite/Base.pm b/videosite/Base.pm
index b31fcb6..bc38468 100644
--- a/videosite/Base.pm
+++ b/videosite/Base.pm
@@ -181,7 +181,11 @@ sub ua {
     my $self = shift;
     my $ua;
 
-    $ua = LWP::UserAgent->new('agent' => 'Mozilla/5.0', 'cookie_jar' => HTTP::Cookies->new);
+    $ua = LWP::UserAgent->new(
+            'agent' => 'Mozilla/5.0',
+            'cookie_jar' => HTTP::Cookies->new,
+            'timeout' => 15,
+            );
 
     # Remove a currently defined HTTPS proxy. See below for a longer explanation.
     delete($ENV{'HTTPS_PROXY'});
-- 
1.8.3.1