Skip to content
Snippets Groups Projects
Commit 9bf5146b authored by Tomáš Plesník's avatar Tomáš Plesník
Browse files

smazano nastaveni lib; odmazany prazdne znaky; oprava volani funkce c2s

parent a4a37951
No related branches found
No related tags found
No related merge requests found
...@@ -12,7 +12,6 @@ use warnings; ...@@ -12,7 +12,6 @@ use warnings;
use SOAP::Lite; use SOAP::Lite;
use File::Basename; use File::Basename;
my $lib = File::Basename::dirname(__FILE__); my $lib = File::Basename::dirname(__FILE__);
use lib $lib;
use WardenClientCommon; use WardenClientCommon;
...@@ -188,7 +187,7 @@ sub getNewEvents ...@@ -188,7 +187,7 @@ sub getNewEvents
sub getClientInfo sub getClientInfo
{ {
# obtain information about clients on Warden server # obtain information about clients on Warden server
my $response = c2s("getClientInfo"); my $response = WardenClientCommon::c2s("getClientInfo");
defined $response or return; # receive data or return undef defined $response or return; # receive data or return undef
# parse server response (SOAP data object) # parse server response (SOAP data object)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment