Move munge_e_type() to Info.pm

This commit is contained in:
Eric Miller
2008-07-15 03:09:18 +00:00
parent 53f9cc8c3d
commit dc48aa08ba
2 changed files with 17 additions and 10 deletions

14
Info.pm
View File

@@ -2605,6 +2605,20 @@ sub munge_null {
return $text;
}
=item munge_e_type()
Takes an OID and return the object name if the right MIB is loaded.
=cut
sub munge_e_type {
my $oid = shift;
my $name = &SNMP::translateObj($oid);
return $name if defined($name);
return $oid;
}
=back
=head2 Internally Used Functions