nacteni konfiguracniho souboru klienta presunuto na zacatek modulu

src/warden-client/lib/WardenClientCommon.pm

@@ -18,6 +18,12 @@ use Carp;
 
 our $VERSION = "2.2";
 
+# load client configuration
+my $lib = File::Basename::dirname(__FILE__);
+my $etc = "$lib/../etc";
+my $conf_file = "$etc/warden-client.conf";
+loadConf($conf_file);
+
 
 #-------------------------------------------------------------------------------
 # errMsg - prints error msg and returns undef or prints warning and returns 1
@@ -134,12 +140,6 @@ sub c2s
 #-------------------------------------------------------------------------------
 sub getClientInfo
 {
-  # load client configuration
-  my $lib = File::Basename::dirname(__FILE__);
-  my $etc = "$lib/../etc";
-  my $conf_file = "$etc/warden-client.conf";
-  loadConf($conf_file);
-
   # obtain information about clients on Warden server
   my $response = c2s($WardenClientCommon::URI, $WardenClientCommon::SSL_KEY, $WardenClientCommon::SSL_CERT, $WardenClientCommon::SSL_CA_CERT, "getClientInfo");
   defined $response or return; # receive data or return undef