From 128653ee6f62b80cb44f0c918087d7ed8e0aafdb Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Sun, 25 Jan 2004 23:43:23 +0000
Subject: fix again adsl type setting :-(

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

(limited to 'perl-install/network/netconnect.pm')

diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm
index 6ae45a5d3..a7ce9a755 100644
--- a/perl-install/network/netconnect.pm
+++ b/perl-install/network/netconnect.pm
@@ -644,7 +644,7 @@ If you don't know, choose 'use pppoe'"),
                               },
                              ],
                     post => sub {
-                        my $adsl_type = find { $adsl_types{$_} eq $adsl_protocol } keys %adsl_types;
+                        $adsl_type = find { $adsl_types{$_} eq $adsl_protocol } keys %adsl_types;
                         if ($adsl_type eq 'dhcp') {
                             $auto_ip = 1;
                             return 'lan_intf';
-- 
cgit v1.2.1