summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2003-11-06 14:20:51 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2003-11-06 14:20:51 +0000
commite66aac574917097a1294e28f1e5aa8b18beaab19 (patch)
tree661b75c0294c842e0eb1072fc2a5e25dd5669b0d /perl-install
parent47a6a2593245a0c8c5d15f4cffc844bb5bf6feb5 (diff)
downloaddrakx-e66aac574917097a1294e28f1e5aa8b18beaab19.tar
drakx-e66aac574917097a1294e28f1e5aa8b18beaab19.tar.gz
drakx-e66aac574917097a1294e28f1e5aa8b18beaab19.tar.bz2
drakx-e66aac574917097a1294e28f1e5aa8b18beaab19.tar.xz
drakx-e66aac574917097a1294e28f1e5aa8b18beaab19.zip
simplify pcmcia matching
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/network/ethernet.pm7
1 files changed, 2 insertions, 5 deletions
diff --git a/perl-install/network/ethernet.pm b/perl-install/network/ethernet.pm
index a28f867dc..0327a6136 100644
--- a/perl-install/network/ethernet.pm
+++ b/perl-install/network/ethernet.pm
@@ -116,11 +116,8 @@ sub conf_network_card_backend {
return map {
my $interface = $_;
my $a = modules::get_alias($interface);
- my $b;
- foreach (@devs) {
- $_->{device} eq $interface and $b = $_->{driver};
- }
- $a ||= $b;
+ my $b = find { $_->{device} eq $interface } @devs;
+ $a ||= $b->{driver};
$a and $saved_driver = $a; # handle multiple cards managed by the same driver
[ $interface, $saved_driver ]
} @all_cards;