From 9d026054bbb21cb8b73a78693bc3d89649c869e3 Mon Sep 17 00:00:00 2001
From: damien <damien@mandriva.com>
Date: Fri, 17 Aug 2001 11:04:05 +0000
Subject: corrected connection script creation

---
 perl-install/network/netconnect.pm | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

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

diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm
index 326f6cd48..456c9276d 100644
--- a/perl-install/network/netconnect.pm
+++ b/perl-install/network/netconnect.pm
@@ -213,7 +213,13 @@ ifdown eth0
     } elsif ($nb == 1) {
 	$netc->{internet_cnx_choice} = (keys %{$netc->{internet_cnx}})[0];
     }
-    $netc->{internet_cnx_choice} and write_cnx_script($netc);
+    if ($netc->{internet_cnx_choice} ) {
+	write_cnx_script($netc);
+    } else {
+	unlink "$prefix/etc/sysconfig/network-scripts/net_cnx_up";
+	unlink "$prefix/etc/sysconfig/network-scripts/net_cnx_down";
+	undef $netc->{NET_DEVICE};
+    }
 
     $::isStandalone and ask_connect_now();
 
-- 
cgit v1.2.1