tyler.durden
/
pandorafms
mirror of https://github.com/pandorafms/pandorafms.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

2010-09-10 Ramon Novoa <rnovoa@artica.es> 

* lib/PandoraFMS/NetworkServer.pm,
          lib/PandoraFMS/Core.pm: Fixed some prototypes that led to warnings
          in recent versions of PERL. This fixes bug #3061906.




git-svn-id: https://svn.code.sf.net/p/pandora/code/trunk@3237 c3f86ba8-e40f-0410-aaad-9ba5e7f4b01f
This commit is contained in:
Ramon Novoa 2010-09-10 09:42:32 +00:00
parent b2b4b3ceb7
commit 933e9b2b39
3 changed files with 9 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
pandora_server/ChangeLog
View File

@ -1,3 +1,9 @@
2010-09-10 Ramon Novoa <rnovoa@artica.es>
* lib/PandoraFMS/NetworkServer.pm,
lib/PandoraFMS/Core.pm: Fixed some prototypes that led to warnings
in recent versions of PERL. This fixes bug #3061906.
2010-09-09 Ramon Novoa <rnovoa@artica.es>
* lib/PandoraFMS/Core.pm: Fixed alert behaviour when time_from is

2
pandora_server/lib/PandoraFMS/Core.pm
View File

@ -1571,7 +1571,7 @@ sub get_module_status ($$$) {
# Validate event.
# This validates all events pending to ACK for the same id_agent_module
##########################################################################
sub pandora_validate_event (%$$) {
sub pandora_validate_event ($$$) {
my ($pa_config, $id_agentmodule, $dbh) = @_;
if (!defined($id_agentmodule)){
return;

4
pandora_server/lib/PandoraFMS/NetworkServer.pm
View File

@ -140,7 +140,7 @@ sub data_consumer ($$) {
# tcp_rcv, id_tipo_module, dbh)
# Makes a call to TCP modules to get a value.
##########################################################################
sub pandora_query_tcp (%$$$$$$$) {
sub pandora_query_tcp ($$$$$$$$) {
my $pa_config = $_[0];
my $tcp_port = $_[1];
my $ip_target = $_[2];
@ -247,7 +247,7 @@ next_pair:
# Makes a call to SNMP modules to get a value,
##########################################################################
sub pandora_query_snmp (%$) {
sub pandora_query_snmp ($$) {
my $pa_config = $_[0];
my $module = $_[1];