diff options
| author | Thierry Vignaud <tvignaud@mandriva.org> | 2004-02-02 14:50:38 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tvignaud@mandriva.org> | 2004-02-02 14:50:38 +0000 |
| commit | f9687c12350631df87addb8d22a8bcaf3e996f37 (patch) | |
| tree | e7a043a2cdae5baed0340f9ba10c26d2e0818fdb /perl-install/harddrake/data.pm | |
| parent | fe15ae2309f0717a158f46e7f25aa963b5214af8 (diff) | |
| download | drakx-backup-do-not-use-f9687c12350631df87addb8d22a8bcaf3e996f37.tar drakx-backup-do-not-use-f9687c12350631df87addb8d22a8bcaf3e996f37.tar.gz drakx-backup-do-not-use-f9687c12350631df87addb8d22a8bcaf3e996f37.tar.bz2 drakx-backup-do-not-use-f9687c12350631df87addb8d22a8bcaf3e996f37.tar.xz drakx-backup-do-not-use-f9687c12350631df87addb8d22a8bcaf3e996f37.zip | |
fix adsl modem detection
Diffstat (limited to 'perl-install/harddrake/data.pm')
| -rw-r--r-- | perl-install/harddrake/data.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/harddrake/data.pm b/perl-install/harddrake/data.pm index d3d15a0e2..dcf20b152 100644 --- a/perl-install/harddrake/data.pm +++ b/perl-install/harddrake/data.pm @@ -65,7 +65,7 @@ our @tree = grep { $_->{media_type} && $_->{media_type} =~ /^NETWORK/ || member($_->{driver}, @usbnet) || $_->{type} && $_->{type} eq 'network' } @devices }, 1 ], [ "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 ? values %$a : () }, 0 ], + require network::adsl; my $a = network::adsl::adsl_detect(); use Data::Dumper; print Data::Dumper->Dump([ $a ], [ 'adsl' ]); $a ? grep { $_ } values %$a : () }, 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 ], [ "BRIDGE", , N("Bridges and system controllers"), "memory.png", "", sub { grep { $_->{media_type} =~ /BRIDGE|MEMORY_RAM/ && $_->{driver} ne 'nvnet' } @devices }, 0 ], |