summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-03-16 14:49:37 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-03-16 14:49:37 +0000
commitb44d5ac8b075d2318a47f965868dd57a514bc247 (patch)
tree73ef2df711ca051061ff0a66f11e3f7f725523b3
parent6f19fcdf8ceab956f52f4597f8f8072bd49a5d34 (diff)
downloaddrakx-b44d5ac8b075d2318a47f965868dd57a514bc247.tar
drakx-b44d5ac8b075d2318a47f965868dd57a514bc247.tar.gz
drakx-b44d5ac8b075d2318a47f965868dd57a514bc247.tar.bz2
drakx-b44d5ac8b075d2318a47f965868dd57a514bc247.tar.xz
drakx-b44d5ac8b075d2318a47f965868dd57a514bc247.zip
pci modem: only take care of selected one
-rw-r--r--perl-install/network/netconnect.pm11
1 files changed, 5 insertions, 6 deletions
diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm
index a2e788444..56fdbe7a7 100644
--- a/perl-install/network/netconnect.pm
+++ b/perl-install/network/netconnect.pm
@@ -469,12 +469,11 @@ Take a look at http://www.linmodems.org"),
my %relocations = (ltmodem => $in->do_pkgs->check_kernel_module_packages('ltmodem'));
my $type;
- foreach (map { $_->{driver} } values %{$netc->{autodetect}{modem}}) {
- /^Hcf:/ and $type = "hcfpcimodem";
- /^Hsf:/ and $type = "hsflinmodem";
- /^LT:/ and $type = "ltmodem";
- $relocations{$type} || $type && $in->do_pkgs->what_provides($type) or $type = undef;
- }
+ my $driver = $netc->{autodetect}{modem}{$modem_name}{driver};
+ $driver =~ /^Hcf:/ and $type = "hcfpcimodem";
+ $driver =~ /^Hsf:/ and $type = "hsflinmodem";
+ $driver =~ /^LT:/ and $type = "ltmodem";
+ $relocations{$type} || $type && $in->do_pkgs->what_provides($type) or $type = undef;
return "no_supported_winmodem" if !$type;