From eeac8fd9a244a7a671cf008f85eb9e3b37b8a79b Mon Sep 17 00:00:00 2001
From: Eric Miller <>
Date: Fri, 7 Apr 2006 02:46:04 +0000
Subject: [PATCH] fix namespace snmp_connect_ip()

---
 Info/Layer3.pm          | 4 ++--
 Info/Layer3/Passport.pm | 8 ++++----
 2 files changed, 6 insertions(+), 6 deletions(-)

diff --git a/Info/Layer3.pm b/Info/Layer3.pm
index 55075f02..e7de3fa3 100644
--- a/Info/Layer3.pm
+++ b/Info/Layer3.pm
@@ -117,13 +117,13 @@ sub root_ip {
         foreach my $key (keys %$ospf_ip){
             my $ip = $ospf_ip->{$key};
             next if $ip eq '0.0.0.0';
-            next unless $l3->_snmp_connect_ip($ip);
+            next unless $l3->snmp_connect_ip($ip);
             print " SNMP::Layer3::root_ip() using $ip\n" if $l3->debug();
             return $ip;
         }
     }
 
-    return $router_ip if ( (defined $router_ip) and ($router_ip ne '0.0.0.0') and ($l3->_snmp_connect_ip($router_ip)) );
+    return $router_ip if ( (defined $router_ip) and ($router_ip ne '0.0.0.0') and ($l3->snmp_connect_ip($router_ip)) );
     return undef;
 }
 
diff --git a/Info/Layer3/Passport.pm b/Info/Layer3/Passport.pm
index 9a4b8100..5e0b39fc 100644
--- a/Info/Layer3/Passport.pm
+++ b/Info/Layer3/Passport.pm
@@ -410,12 +410,12 @@ sub root_ip {
             my $ip = $rc_ip_addr->{$iid};
             next unless defined $ip;
             
-            return $ip if $passport->_snmp_connect_ip($ip);
+            return $ip if $passport->snmp_connect_ip($ip);
         }
 
         # Return Management Virtual IP address
         if ( (defined $virt_ip) and ($virt_ip ne '0.0.0.0') ) {
-            return $virt_ip if $passport->_snmp_connect_ip($virt_ip);
+            return $virt_ip if $passport->snmp_connect_ip($virt_ip);
         }
     }
 
@@ -424,7 +424,7 @@ sub root_ip {
         foreach my $iid (keys %$rc_ip_addr){
             my $ip = $rc_ip_addr->{$iid};
             next unless $router_ip eq $ip;
-            return $router_ip if $passport->_snmp_connect_ip($router_ip);
+            return $router_ip if $passport->snmp_connect_ip($router_ip);
         }
     }
 
@@ -433,7 +433,7 @@ sub root_ip {
         my $port = $sonmp_topo_port->{$entry};
         next unless $port == 0;
         my $ip = $sonmp_topo_ip->{$entry};
-        return $ip if ( (defined $ip) and ($ip ne '0.0.0.0') and ($passport->_snmp_connect_ip($ip)) );
+        return $ip if ( (defined $ip) and ($ip ne '0.0.0.0') and ($passport->snmp_connect_ip($ip)) );
     }
     return undef;
 }