remove root_ip()

This commit is contained in:
Eric Miller
2005-09-29 02:48:45 +00:00
parent bf040dffa9
commit 9b2229e3eb

View File

@@ -157,20 +157,6 @@ sub i_name {
return \%i_name;
}
sub root_ip {
my $contivity = shift;
my $ip_table = $contivity->ip_table();
# Return First IP Address
foreach my $entry (keys %$ip_table){
my $router_ip = $ip_table->{$entry};
print " SNMP::Layer3::Contivity::root_ip() using $router_ip\n" if $contivity->debug();
next unless $router_ip;
return $router_ip if ($router_ip ne '0.0.0.0');
}
return undef;
}
1;
__END__
@@ -264,11 +250,6 @@ Returns the chassis serial number.
Returns the MAC address of the first Ethernet Interface.
=item $contivity->root_ip()
Returns the primary IP used to communicate with the router. Returns the first
IP interface.
=back
=head2 Overrides