135/snmp-info
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix a small warning

Browse Source
This commit is contained in:
Max Baker
2006-01-17 04:18:10 +00:00
parent 1d1193c459
commit d1636f0fe9
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
Info/Layer2/Allied.pm
View File

@@ -119,10 +119,10 @@ sub i_up {
my $allied = shift; my $allied = shift;
my $i_up = SNMP::Info::Layer1::i_up($allied); my $i_up = SNMP::Info::Layer1::i_up($allied);
my $i_up2 = $allied->i_up2(); #my $i_up2 = $allied->i_up2() || {};
foreach my $port (keys %$ati_up){ foreach my $port (keys %$i_up){
my $up = $ati_up->{$port}; my $up = $i_up->{$port};
$i_up->{$port} = 'down' if $up eq 'linktesterror'; $i_up->{$port} = 'down' if $up eq 'linktesterror';
$i_up->{$port} = 'up' if $up eq 'nolinktesterror'; $i_up->{$port} = 'up' if $up eq 'nolinktesterror';
} }