diff options
author | Thierry Vignaud <tvignaud@mandriva.org> | 2005-05-19 07:29:20 +0000 |
---|---|---|
committer | Thierry Vignaud <tvignaud@mandriva.org> | 2005-05-19 07:29:20 +0000 |
commit | eab29893ecde2bedd7c4272bcaa1ef885fdd5123 (patch) | |
tree | 664f148905bb82cc682dc95958d62b903dd0f023 /perl-install/network | |
parent | 1d83d1c840d40137e2001477e1728e59368076b9 (diff) | |
download | drakx-eab29893ecde2bedd7c4272bcaa1ef885fdd5123.tar drakx-eab29893ecde2bedd7c4272bcaa1ef885fdd5123.tar.gz drakx-eab29893ecde2bedd7c4272bcaa1ef885fdd5123.tar.bz2 drakx-eab29893ecde2bedd7c4272bcaa1ef885fdd5123.tar.xz drakx-eab29893ecde2bedd7c4272bcaa1ef885fdd5123.zip |
(adsl_detect) simplify again
Diffstat (limited to 'perl-install/network')
-rw-r--r-- | perl-install/network/adsl.pm | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/perl-install/network/adsl.pm b/perl-install/network/adsl.pm index 1b089900f..d12627387 100644 --- a/perl-install/network/adsl.pm +++ b/perl-install/network/adsl.pm @@ -96,10 +96,7 @@ sub adsl_detect() { return { bewan => [ detect_devices::getBewan() ], eci => [ detect_devices::getECI() ], - map { - my @devices = detect_devices::matching_driver($_); - $compat{$_} || $_ => \@devices; - } @modules, + map { $compat{$_} || $_ => [ detect_devices::matching_driver($_) ] } @modules, }; } |