From cda9654b7830121714931a8a704d13d0b0e0130c Mon Sep 17 00:00:00 2001 From: Damien Chaumette Date: Fri, 21 Feb 2003 19:41:59 +0000 Subject: $isdn->{is_light} wasn't set while using autodetection, rpm wasn't installed --- perl-install/network/isdn.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'perl-install/network') diff --git a/perl-install/network/isdn.pm b/perl-install/network/isdn.pm index 2c218621b..8a1a6381c 100644 --- a/perl-install/network/isdn.pm +++ b/perl-install/network/isdn.pm @@ -41,6 +41,7 @@ We recommand the light configuration. $netc->{isdntype} = 'isdn_internal'; $netcnx->{isdn_internal} = isdn_read_config($isdn); $netcnx->{isdn_internal}{$_} = $netc->{autodetect}{isdn}{$_} foreach 'description', 'vendor', 'id', 'driver', 'card_type', 'type', 'is_light'; + $netc->{autodetect}{isdn} and $isdn->{is_light} = 1; isdn_detect($netcnx->{isdn_internal}, $netc) or return; } else { $netc->{isdntype} = 'isdn_external'; @@ -278,7 +279,7 @@ If you have a PCMCIA card, you have to know the \"irq\" and \"io\" of your card. $e = $in->ask_from_listf(N("ISDN Configuration"), N("Which of the following is your ISDN card?"), sub { $_[0]{description} }, - [ grep { $_->{card} eq $isdn->{card_type} } @isdn::isdndata ]) or goto isdn_ask_step_1; + [ grep { $_->{card} eq $isdn->{card_type} } @isdndata ]) or goto isdn_ask_step_1; $e->{$_} and $isdn->{$_} = $e->{$_} foreach qw(driver type mem io io0 io1 irq firmware); isdn_ask_step_3: -- cgit v1.2.1