Silence uninitialized value warning in L3::Cisco

2014-07-08 21:48:50 -04:00
parent cd54b07e09
commit 0f5319bc52
2 changed files with 2 additions and 0 deletions
--- a/Info/Layer3/Cisco.pm
+++ b/Info/Layer3/Cisco.pm
@@ -124,6 +124,7 @@ sub i_vlan {
    my $i_vlan  = $cisco->SUPER::i_vlan($partial);

    foreach my $idx ( keys %$i_descr ) {
+        next unless $i_type->{$idx};
        if (   $i_type->{$idx} eq 'l2vlan'
            || $i_type->{$idx} eq '135' && !defined $i_vlan->{$idx} )
        {