From 288aea1cb81de0c2441a081244eac225c6053fed Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Mon, 27 Oct 2003 13:03:56 +0000 Subject: split out adsl detection from modem one into its one category --- perl-install/harddrake/data.pm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'perl-install/harddrake') diff --git a/perl-install/harddrake/data.pm b/perl-install/harddrake/data.pm index b77f637d8..4e642d327 100644 --- a/perl-install/harddrake/data.pm +++ b/perl-install/harddrake/data.pm @@ -63,7 +63,9 @@ our @tree = my @usbnet = (list_modules::category2modules('network/usb'), "nvnet"); # rought hack for nforce2's nvet grep { $_->{media_type} && $_->{media_type} =~ /^NETWORK/ || member($_->{driver}, @usbnet) || $_->{type} && $_->{type} eq 'network' } @devices }, 1 ], - [ "MODEM", , N("Modem"), "modem.png", "", sub { detect_devices::getSpeedtouch(), detect_devices::getSagem(), detect_devices::getModem() }, 0 ], + [ "MODEM", , N("Modem"), "modem.png", "", sub { detect_devices::getModem() }, 0 ], + [ "ADSL", , N("ADSL adapters"), "modem.png", "", sub { + require network::adsl; my $a = network::adsl::adsl_detect(); $a ? values %$a : () }, 0 ], [ "BRIDGE", , N("Bridges and system controllers"), "memory.png", "", sub { grep { $_->{media_type} =~ /BRIDGE|MEMORY_RAM/ && $_->{driver} ne 'nvnet' } @devices }, 0 ], [ "UNKNOWN", , N("Unknown/Others"), "unknown.png", "", \&unknown, 0 ], -- cgit v1.2.1