From 32f5e6193f63c14e11c5e9cb02a6d6126f4bd348 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Sun, 15 Feb 2004 21:15:03 +0000 Subject: typo fix :-) --- perl-install/harddrake/data.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl-install/harddrake/data.pm b/perl-install/harddrake/data.pm index 71b9f3cd7..96e5fccd2 100644 --- a/perl-install/harddrake/data.pm +++ b/perl-install/harddrake/data.pm @@ -67,6 +67,7 @@ our @tree = 0 ], [ "CPU", , N("Processors"), "cpu.png", "", sub { detect_devices::getCPUs() }, 0 ], [ "ISDN", , N("ISDN adapters"), "modem.png", "$sbindir/drakconnect", sub { require network::isdn; my $isdn = network::isdn::isdn_detect_backend(); + if_(!is_empty_hash_ref($isdn), $isdn) }, 0 ], [ "ETHERNET", , N("Ethernetcard"), "hw_network.png", "$sbindir/drakconnect", sub { #- generic NIC detection for USB seems broken (class, subclass, #- protocol report are not accurate) so I'll need to verify against @@ -78,7 +79,6 @@ our @tree = [ "MODEM", , N("Modem"), "modem.png", "$sbindir/drakconnect", sub { detect_devices::getModem() }, 0 ], [ "ADSL", , N("ADSL adapters"), "modem.png", "$sbindir/drakconnect", sub { require network::adsl; my $a = network::adsl::adsl_detect(); $a ? f(grep { $_ } values %$a) : () }, 0 ], - if_(!is_empty_hash_ref($isdn), $isdn) }, 0 ], [ "BRIDGE", , N("Bridges and system controllers"), "memory.png", "", sub { f(grep { $_->{media_type} =~ /BRIDGE|MEMORY_RAM/ && $_->{driver} ne 'nvnet' } @devices) }, 0 ], [ "PRINTER", , N("Printer"), "hw_printer.png", "$sbindir/printerdrake", sub { require printer::detect; printer::detect::local_detect() }, 0 ], -- cgit v1.2.1