[3541442] Change L2::Catalyst port names to what is reported in CDP

2012-07-08 21:45:13 -04:00
parent 50b4274f68
commit 2972c70177
2 changed files with 3 additions and 0 deletions
--- a/Info/Layer2/Catalyst.pm
+++ b/Info/Layer2/Catalyst.pm
@@ -148,7 +148,9 @@ sub interfaces {
    foreach my $iid ( keys %$i_index ) {
        next unless defined $iid;
        my $if   = $i_index->{$iid};
+        $if =~ s/\./\// if $if;
        my $port = $portmap{$iid};
+        $port =~ s/\./\// if $port;
        $interfaces{$iid} = $port || $if;
    }
    return \%interfaces;