[#211] Additional check for undefined SNMP::Info instance
This commit is contained in:
@@ -1,3 +1,13 @@
|
|||||||
|
2.032003 - 2015-04-25
|
||||||
|
|
||||||
|
[ENHANCEMENTS]
|
||||||
|
|
||||||
|
* THANK YOUs
|
||||||
|
|
||||||
|
[BUG FIXES]
|
||||||
|
|
||||||
|
* [#211] Additional check for undefined SNMP::Info instance
|
||||||
|
|
||||||
2.032002 - 2015-04-03
|
2.032002 - 2015-04-03
|
||||||
|
|
||||||
[ENHANCEMENTS]
|
[ENHANCEMENTS]
|
||||||
|
|||||||
@@ -145,7 +145,7 @@ sub _try_connect {
|
|||||||
$snmp_args->{DestHost}, $snmp_args->{Version}, $class, $debug_comm;
|
$snmp_args->{DestHost}, $snmp_args->{Version}, $class, $debug_comm;
|
||||||
Module::Load::load $class;
|
Module::Load::load $class;
|
||||||
|
|
||||||
$info = $class->new(%$snmp_args, %comm_args);
|
$info = $class->new(%$snmp_args, %comm_args) or return;
|
||||||
$info = ($mode eq 'read' ? _try_read($info, $device, $comm)
|
$info = ($mode eq 'read' ? _try_read($info, $device, $comm)
|
||||||
: _try_write($info, $device, $comm));
|
: _try_write($info, $device, $comm));
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user