From 0551c01861a02e95501f97bf224876489ebe396b Mon Sep 17 00:00:00 2001 From: Damien Chaumette Date: Tue, 4 May 2004 15:04:24 +0000 Subject: use @cards instead of $#cards as told by master pipi --- perl-install/network/ethernet.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/network/ethernet.pm') diff --git a/perl-install/network/ethernet.pm b/perl-install/network/ethernet.pm index 3d7888ca7..845d7b3d8 100644 --- a/perl-install/network/ethernet.pm +++ b/perl-install/network/ethernet.pm @@ -63,7 +63,7 @@ sub get_eth_cards() { } if (!$description) { my @cards = grep { $_->{driver} eq ($a || $saved_driver) } detect_devices::probeall(); - $description = $cards[0]{description} if $#cards == 0; + $description = $cards[0]{descripxtion} if @cards == 1; } $a and $saved_driver = $a; # handle multiple cards managed by the same driver [ $interface, $saved_driver, if_($description, $description) ] -- cgit v1.2.1