Update the correct file
This commit is contained in:
parent
0da066954b
commit
6459c6aa73
|
@ -22,7 +22,6 @@ use warnings;
|
|||
use POSIX qw(strftime);
|
||||
use threads;
|
||||
use Digest::MD5 qw(md5_hex);
|
||||
use Data::Dumper;
|
||||
|
||||
# Default lib dir for RPM and DEB packages
|
||||
use lib '/usr/lib/perl5';
|
||||
|
@ -713,7 +712,6 @@ sub main() {
|
|||
my $curl_execution = "'".$Config{'console_api_url'}."?op=get&op2=test&apipass=".$Config{"console_api_pass"}."&user=".$Config{"console_user"}."&pass=".$Config{"console_pass"}."'";
|
||||
my $exe_testing_api = `curl $curl_execution 2>/dev/null`;
|
||||
my @res_testing_api = split(',', $exe_testing_api);
|
||||
|
||||
if ( $res_testing_api[0] ne 'OK' ) {
|
||||
logger(\%Config, "Warning! The server does not have access to the API, this can trigger problems in the generation of reports and graphs.", 1);
|
||||
pandora_event (\%Config, "Server does not have access to the API", 0, 0, 0, 0, 0, 'system', 0, $DBH);
|
||||
|
|
Loading…
Reference in New Issue