From 86824e6cc04ead3fcda2c7bf16149f84859fb6b6 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Wed, 24 Mar 2004 16:03:46 +0000 Subject: fix ISDN modem selection --- perl-install/network/netconnect.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/network') diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm index 264aa6925..1ca1e4cff 100644 --- a/perl-install/network/netconnect.pm +++ b/perl-install/network/netconnect.pm @@ -357,7 +357,7 @@ sub real_main { $netc->{isdntype} = 'isdn_internal'; # FIXME: some of these should be taken from isdn db - $netcnx->{isdn_internal} = $isdn = { map { $_ => $isdn_cards{$my_isdn}{$_} } qw(description vendor id card_type driver type mem io io0 io1 irq firmware) }; + $netcnx->{isdn_internal} = $isdn = { map { $_ => $isdn_cards{$isdn_name}{$_} } qw(description vendor id card_type driver type mem io io0 io1 irq firmware) }; if ($isdn->{id}) { log::explanations("found isdn card : $isdn->{description}; vendor : $isdn->{vendor}; id : $isdn->{id}; driver : $isdn->{driver}\n"); -- cgit v1.2.1