From 411564f5b39a3c21a4a2dc81b3783ccf2c99fb97 Mon Sep 17 00:00:00 2001
From: Damien Chaumette <dchaumette@mandriva.com>
Date: Tue, 9 Sep 2003 16:23:03 +0000
Subject: profile is 'default' if no configuration file found

---
 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 40fa26f6c..bd7d45ecc 100644
--- a/perl-install/network/netconnect.pm
+++ b/perl-install/network/netconnect.pm
@@ -307,7 +307,7 @@ sub load_conf {
     my ($netcnx, $netc, $intf) = @_;
     my $current = { getVarsFromSh("$prefix/etc/netprofile/current") };
     
-    $netcnx->{PROFILE} = $current->{PROFILE};
+    $netcnx->{PROFILE} = $current->{PROFILE} || 'default';
     network::read_all_conf($prefix, $netc, $intf);
 }
 
-- 
cgit v1.2.1