--- Net-SNMP-XS/XS.pm 2009/04/11 06:24:18 1.8 +++ Net-SNMP-XS/XS.pm 2014/10/23 15:58:16 1.14 @@ -25,8 +25,6 @@ =item overriding internal functions might cause the module to malfunction with future versions of Net::SNMP -=item only leading dots for oids are supported - =item error messages will be simpler/different =item translation will be ignored (all values will be delivered "raw") @@ -56,26 +54,15 @@ use Net::SNMP::MessageProcessing (); our $VERSION; -our $old_prepare; BEGIN { - $VERSION = '0.02'; - - $old_prepare = \&Net::SNMP::MessageProcessing::prepare_data_elements; + $VERSION = 1.31; - # this overrides many methods inside + # this overrides many methods inside Net::SNMP and it's submodules require XSLoader; XSLoader::load Net::SNMP::XS, $VERSION; } -sub Net::SNMP::MessageProcessing::prepare_data_elements { - my ($self, $msg) = @_; - - set_msg $msg, $msg->{_buffer}; - scope_guard \&clr_msg; - &$old_prepare -} - package Net::SNMP::Message; Net::SNMP::XS::set_type INTEGER , \&_process_integer32; @@ -104,7 +91,7 @@ package Net::SNMP::PDU; -# var_bind_list hardcodes oid_lext_sort. *sigh* +# var_bind_list hardcodes oid_lex_sort. *sigh* # we copy it 1:1, except for using oid_lex_sort. sub var_bind_list