From 3e4ad5e1b687f262a1d7cc39a0b905a595ac7f95 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Tue, 11 May 2004 12:31:46 +0000
Subject: perl_checker compliance

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

(limited to 'perl-install/network')

diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm
index 2e073fb53..d4ff1ab1d 100644
--- a/perl-install/network/netconnect.pm
+++ b/perl-install/network/netconnect.pm
@@ -1194,7 +1194,7 @@ N("Last but not least you can also type in your DNS server IP addresses."),
                     type => "yesorno",
                     post => sub {
                         my ($a) = @_;
-                        my ($type) = $netc->{internet_cnx_choice};
+                        my $type = $netc->{internet_cnx_choice};
                         $up = 1;
                         if ($a) {
                             # local $::isWizard = 0;
-- 
cgit v1.2.1