From 95fbbed1f6db7c968c00cba417432377cf155f3f Mon Sep 17 00:00:00 2001
From: damien <damien@mandriva.com>
Date: Tue, 10 Apr 2001 02:29:59 +0000
Subject: minor correction

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

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

diff --git a/perl-install/network.pm b/perl-install/network.pm
index 2ee47426e..9a89fd0be 100644
--- a/perl-install/network.pm
+++ b/perl-install/network.pm
@@ -254,13 +254,13 @@ sub configureNetwork {
 
   configureNetwork_step_1:
     my $n_card=0;
+    $netc ||= {};
     my $last; foreach (@l) {
 	my $intf2 = findIntf($intf ||= {}, $_);
 	add2hash($intf2, $last);
 	add2hash($intf2, { NETMASK => '255.255.255.0' });
 	configureNetworkIntf($netc, $in, $intf2, $netc->{NET_DEVICE}, 0, $all_cards[$n_card]->[1]) or return;
 
-	$netc ||= {};
 	$last = $intf2;
 	$n_card++;
     }
-- 
cgit v1.2.1