summaryrefslogtreecommitdiffstats
path: root/perl-install/network/netconnect.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/network/netconnect.pm')
-rw-r--r--perl-install/network/netconnect.pm7
1 files changed, 6 insertions, 1 deletions
diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm
index 522beecd7..3ea33ebb0 100644
--- a/perl-install/network/netconnect.pm
+++ b/perl-install/network/netconnect.pm
@@ -767,8 +767,13 @@ If you don't know, choose 'use PPPoE'"),
# blacklist bogus driver, enable ifplugd support else:
$find_lan_module->();
$ethntf->{MII_NOT_SUPPORTED} ||= $is_hotplug_blacklisted->();
+ if ($ntf_name eq "sagem") {
+ #- FIXME: duplicated with %modems from adsl.pm
+ $ethntf = $intf->{$ntf_name} = { DEVICE => "`/usr/sbin/eaglectrl -i`", MII_NOT_SUPPORTED => "yes" };
+ }
# process static/dhcp ethernet devices:
- if (!exists $adsl_devices{$ntf_name} && member($adsl_type, qw(manual dhcp))) {
+ if (exists($intf->{$ntf_name}) && member($adsl_type, qw(manual dhcp))) {
+ $ethntf->{TYPE} = "ADSL";
$auto_ip = $adsl_type eq 'dhcp';
return 'lan_intf';
}