diff options
| author | Olivier Blin <oblin@mandriva.org> | 2004-09-16 02:07:32 +0000 |
|---|---|---|
| committer | Olivier Blin <oblin@mandriva.org> | 2004-09-16 02:07:32 +0000 |
| commit | ad5fb0dc3b6b31a661be27b576876492996ad901 (patch) | |
| tree | eedb71c82d150c4e4958a659b8cb1f5f56b44002 /perl-install | |
| parent | 06089883acc83a33d308ee7fcc7fc7d3e48e1d89 (diff) | |
| download | drakx-ad5fb0dc3b6b31a661be27b576876492996ad901.tar drakx-ad5fb0dc3b6b31a661be27b576876492996ad901.tar.gz drakx-ad5fb0dc3b6b31a661be27b576876492996ad901.tar.bz2 drakx-ad5fb0dc3b6b31a661be27b576876492996ad901.tar.xz drakx-ad5fb0dc3b6b31a661be27b576876492996ad901.zip | |
make isdn over capi work again
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/network/isdn.pm | 2 | ||||
| -rw-r--r-- | perl-install/network/netconnect.pm | 8 |
2 files changed, 4 insertions, 6 deletions
diff --git a/perl-install/network/isdn.pm b/perl-install/network/isdn.pm index 33cf70a3d..084ec5370 100644 --- a/perl-install/network/isdn.pm +++ b/perl-install/network/isdn.pm @@ -49,7 +49,7 @@ defaultroute services::stop("isdn4linux"); #- to be stopped before capi is loaded if ($isdn->{driver} eq "capidrv") { - setup_capi_conf($isdn); + setup_capi_conf(get_capi_card($isdn)); services::start_service_on_boot("capi4linux"); services::restart("capi4linux"); } else { diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm index a6f5c9b72..c00a12b41 100644 --- a/perl-install/network/netconnect.pm +++ b/perl-install/network/netconnect.pm @@ -85,7 +85,7 @@ sub real_main { my ($modem, $modem_name, $modem_conf_read, $modem_dyn_dns, $modem_dyn_ip); my ($adsl_type, @adsl_devices, $adsl_failed, $adsl_answer, %adsl_data, $adsl_data, $adsl_provider, $adsl_old_provider); my ($ntf_name, $gateway_ex, $up, $need_restart_network); - my ($isdn, $isdn_capi, $isdn_name, $isdn_type, %isdn_cards, @isdn_dial_methods); + my ($isdn, $isdn_name, $isdn_type, %isdn_cards, @isdn_dial_methods); my $my_isdn = join('', N("Manual choice"), " (", N("Internal ISDN card"), ")"); my ($module, $auto_ip, $protocol, $onboot, $needhostname, $hotplug, $track_network_id, @fields); # lan config my $success = 1; @@ -360,7 +360,7 @@ sub real_main { network::isdn::read_config($isdn); $isdn->{driver} = $isdn_cards{$isdn_name}{driver}; #- do not let config overwrite default driver - $isdn_capi = network::isdn::get_capi_card($isdn) and return "isdn_driver"; + network::isdn::get_capi_card($isdn) and return "isdn_driver"; return "isdn_protocol"; }, }, @@ -425,9 +425,7 @@ If you have a PCMCIA card, you have to know the \"irq\" and \"io\" of your card. list => [ $isdn->{driver}, "capidrv" ] } ] }, post => sub { - if ($isdn_name eq "capidrv") { - put_in_hash($isdn, $isdn_capi); - } + $isdn->{driver} = $isdn_name; return "isdn_protocol"; } }, |