From 61e83e30ca89ffc8adb04b478edf9625e5ef31d7 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Thu, 19 May 2005 03:30:56 +0000
Subject: (adsl_detect) typo fix

---
 perl-install/network/adsl.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl-install/network/adsl.pm b/perl-install/network/adsl.pm
index c862b6f23..f2ddacf63 100644
--- a/perl-install/network/adsl.pm
+++ b/perl-install/network/adsl.pm
@@ -93,7 +93,7 @@ sub adsl_detect() {
     return {
             bewan => [ detect_devices::getBewan() ],
             eci   => [ detect_devices::getECI() ],
-            map { my $drv = $_->{driver}; $drv = $compat{$drv} || $drv; $drv => $_ } modules::probe_category('network/usb_dsl'),
+            map { my $drv = $_->{driver}; $drv = $compat{$drv} || $drv; $drv => [ $_ ] } modules::probe_category('network/usb_dsl'),
            };
 }
 
-- 
cgit v1.2.1