summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-01-22 23:25:42 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-01-22 23:25:42 +0000
commitaec2c4dcb3386c10c4d49b56aaf83e3c1922e49d (patch)
tree2632a20c806dfc46aa8409f4c369eb1622254d3a /perl-install
parentbecb5aa7f5a6ab68e52f25ccef14ee2b0b8eed85 (diff)
downloaddrakx-aec2c4dcb3386c10c4d49b56aaf83e3c1922e49d.tar
drakx-aec2c4dcb3386c10c4d49b56aaf83e3c1922e49d.tar.gz
drakx-aec2c4dcb3386c10c4d49b56aaf83e3c1922e49d.tar.bz2
drakx-aec2c4dcb3386c10c4d49b56aaf83e3c1922e49d.tar.xz
drakx-aec2c4dcb3386c10c4d49b56aaf83e3c1922e49d.zip
config some stuff about adsl protocol
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/network/netconnect.pm14
1 files changed, 14 insertions, 0 deletions
diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm
index 02ad412f5..39670d9d5 100644
--- a/perl-install/network/netconnect.pm
+++ b/perl-install/network/netconnect.pm
@@ -621,6 +621,20 @@ If you don't know, choose 'use pppoe'"),
list => [ values %adsl_types ],
},
],
+ post => sub {
+ my $adsl_type = find { $adsl_types{$_} eq $adsl_protocol } keys %adsl_devices;
+ find
+ if ($adsl_type eq 'dhcp') {
+ $auto_ip = 1;
+ return 'lan_intf';
+ } elsif ($adsl_type eq 'manual') {
+ $auto_ip = 0;
+ return 'lan_intf';
+ } elsif ($adsl_type eq 'pppoe') {
+ $netc->{NET_DEVICE} = $ntf_name;
+ }
+ return 'hw_account';
+ },
},
adsl_unsupported_eci =>