agent.pm (net-snmp-5.9.2) | : | agent.pm (net-snmp-5.9.3) | ||
---|---|---|---|---|
skipping to change at line 90 | skipping to change at line 90 | |||
SNMP_ERR_WRONGENCODING | SNMP_ERR_WRONGENCODING | |||
SNMP_ERR_WRONGVALUE | SNMP_ERR_WRONGVALUE | |||
SNMP_ERR_NOCREATION | SNMP_ERR_NOCREATION | |||
SNMP_ERR_INCONSISTENTVALUE | SNMP_ERR_INCONSISTENTVALUE | |||
SNMP_ERR_RESOURCEUNAVAILABLE | SNMP_ERR_RESOURCEUNAVAILABLE | |||
SNMP_ERR_COMMITFAILED | SNMP_ERR_COMMITFAILED | |||
SNMP_ERR_UNDOFAILED | SNMP_ERR_UNDOFAILED | |||
SNMP_ERR_AUTHORIZATIONERROR | SNMP_ERR_AUTHORIZATIONERROR | |||
SNMP_ERR_NOTWRITABLE | SNMP_ERR_NOTWRITABLE | |||
); | ); | |||
$VERSION = '5.0902'; | $VERSION = '5.0903'; | |||
sub AUTOLOAD { | sub AUTOLOAD { | |||
# This AUTOLOAD is used to 'autoload' constants from the constant() | # This AUTOLOAD is used to 'autoload' constants from the constant() | |||
# XS function. If a constant is not found then control is passed | # XS function. If a constant is not found then control is passed | |||
# to the AUTOLOAD in AutoLoader. | # to the AUTOLOAD in AutoLoader. | |||
my $constname; | my $constname; | |||
($constname = $AUTOLOAD) =~ s/.*:://; | ($constname = $AUTOLOAD) =~ s/.*:://; | |||
croak "& not defined" if $constname eq 'constant'; | croak "& not defined" if $constname eq 'constant'; | |||
my $val; | my $val; | |||
End of changes. 1 change blocks. | ||||
1 lines changed or deleted | 1 lines changed or added |