From 66a22e77f3842f47fb185d87984812ba18ab6eb8 Mon Sep 17 00:00:00 2001
From: Tomas Plesnik <plesnik@ics.muni.cz>
Date: Thu, 21 Jun 2012 13:39:46 +0200
Subject: [PATCH] doplnen timeout pro navazani spojeni se serverem

---
 src/warden-server/lib/WardenReg.pm    | 1 +
 src/warden-server/lib/WardenStatus.pm | 1 +
 2 files changed, 2 insertions(+)

diff --git a/src/warden-server/lib/WardenReg.pm b/src/warden-server/lib/WardenReg.pm
index e5ff0cd..12361f0 100755
--- a/src/warden-server/lib/WardenReg.pm
+++ b/src/warden-server/lib/WardenReg.pm
@@ -43,6 +43,7 @@ sub c2s
   if (!($client = SOAP::Transport::HTTP::Client->new())) {
     errMsg("Sorry, unable to create socket: " . &SOAP::Transport::HTTP::Client::errstr)
   }
+  $client->timeout(60);
   $client->ssl_opts(    verify_hostname     => 1,
                         SSL_use_cert        => 1,
                         SSL_verify_mode     => 0x02,
diff --git a/src/warden-server/lib/WardenStatus.pm b/src/warden-server/lib/WardenStatus.pm
index eea49e4..1075ec4 100755
--- a/src/warden-server/lib/WardenStatus.pm
+++ b/src/warden-server/lib/WardenStatus.pm
@@ -43,6 +43,7 @@ sub c2s
   if (!($client = SOAP::Transport::HTTP::Client->new())) {
     errMsg("Sorry, unable to create socket: " . &SOAP::Transport::HTTP::Client::errstr)
   }
+  $client->timeout(60);
   $client->ssl_opts(verify_hostname     => 1,
                     SSL_use_cert        => 1,
                     SSL_verify_mode     => 0x02,
-- 
GitLab