diff options
| -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, }; } |