From 2add807da9be44f9fcdf3c513880dacedcefb94e Mon Sep 17 00:00:00 2001 From: garnier-quentin Date: Mon, 24 Aug 2015 17:07:09 +0200 Subject: [PATCH] + Fix threshold-overload --- hardware/pdu/raritan/snmp/mode/inletsensors.pm | 4 ++-- hardware/pdu/raritan/snmp/mode/ocprotsensors.pm | 4 ++-- hardware/pdu/raritan/snmp/mode/outletsensors.pm | 4 ++-- hardware/sensors/hwgste/snmp/mode/sensors.pm | 4 ++-- network/bluecoat/snmp/mode/hardware.pm | 4 ++-- 5 files changed, 10 insertions(+), 10 deletions(-) diff --git a/hardware/pdu/raritan/snmp/mode/inletsensors.pm b/hardware/pdu/raritan/snmp/mode/inletsensors.pm index 4d56e36bd..9ec719903 100644 --- a/hardware/pdu/raritan/snmp/mode/inletsensors.pm +++ b/hardware/pdu/raritan/snmp/mode/inletsensors.pm @@ -77,10 +77,10 @@ sub check_options { } my ($section, $instance, $status, $filter); if (scalar(@values) == 3) { - ($section, $status, $filter) = @_; + ($section, $status, $filter) = @values; $instance = '.*'; } else { - ($section, $instance, $status, $filter) = @_; + ($section, $instance, $status, $filter) = @values; } if ($self->{output}->is_litteral_status(status => $status) == 0) { $self->{output}->add_option_msg(short_msg => "Wrong threshold-overload status '" . $val . "'."); diff --git a/hardware/pdu/raritan/snmp/mode/ocprotsensors.pm b/hardware/pdu/raritan/snmp/mode/ocprotsensors.pm index e5ee13b32..f60deedf0 100644 --- a/hardware/pdu/raritan/snmp/mode/ocprotsensors.pm +++ b/hardware/pdu/raritan/snmp/mode/ocprotsensors.pm @@ -77,10 +77,10 @@ sub check_options { } my ($section, $instance, $status, $filter); if (scalar(@values) == 3) { - ($section, $status, $filter) = @_; + ($section, $status, $filter) = @values; $instance = '.*'; } else { - ($section, $instance, $status, $filter) = @_; + ($section, $instance, $status, $filter) = @values; } if ($self->{output}->is_litteral_status(status => $status) == 0) { $self->{output}->add_option_msg(short_msg => "Wrong threshold-overload status '" . $val . "'."); diff --git a/hardware/pdu/raritan/snmp/mode/outletsensors.pm b/hardware/pdu/raritan/snmp/mode/outletsensors.pm index 164a8d810..4a7e0a3b0 100644 --- a/hardware/pdu/raritan/snmp/mode/outletsensors.pm +++ b/hardware/pdu/raritan/snmp/mode/outletsensors.pm @@ -77,10 +77,10 @@ sub check_options { } my ($section, $instance, $status, $filter); if (scalar(@values) == 3) { - ($section, $status, $filter) = @_; + ($section, $status, $filter) = @values; $instance = '.*'; } else { - ($section, $instance, $status, $filter) = @_; + ($section, $instance, $status, $filter) = @values; } if ($self->{output}->is_litteral_status(status => $status) == 0) { $self->{output}->add_option_msg(short_msg => "Wrong threshold-overload status '" . $val . "'."); diff --git a/hardware/sensors/hwgste/snmp/mode/sensors.pm b/hardware/sensors/hwgste/snmp/mode/sensors.pm index f41460dcb..61ef612ab 100644 --- a/hardware/sensors/hwgste/snmp/mode/sensors.pm +++ b/hardware/sensors/hwgste/snmp/mode/sensors.pm @@ -97,10 +97,10 @@ sub check_options { } my ($section, $instance, $status, $filter); if (scalar(@values) == 3) { - ($section, $status, $filter) = @_; + ($section, $status, $filter) = @values; $instance = '.*'; } else { - ($section, $instance, $status, $filter) = @_; + ($section, $instance, $status, $filter) = @values; } if ($self->{output}->is_litteral_status(status => $status) == 0) { $self->{output}->add_option_msg(short_msg => "Wrong threshold-overload status '" . $val . "'."); diff --git a/network/bluecoat/snmp/mode/hardware.pm b/network/bluecoat/snmp/mode/hardware.pm index 7182fcf62..7e602a356 100644 --- a/network/bluecoat/snmp/mode/hardware.pm +++ b/network/bluecoat/snmp/mode/hardware.pm @@ -122,10 +122,10 @@ sub check_options { } my ($section, $instance, $status, $filter); if (scalar(@values) == 3) { - ($section, $status, $filter) = @_; + ($section, $status, $filter) = @values; $instance = '.*'; } else { - ($section, $instance, $status, $filter) = @_; + ($section, $instance, $status, $filter) = @values; } if ($section !~ /^sensor$/) { $self->{output}->add_option_msg(short_msg => "Wronghreshold-overload section '" . $val . "'.");