From 252055ec0535dd85feda5aae4d18c5777ca991bd Mon Sep 17 00:00:00 2001
From: damien <damien@mandriva.com>
Date: Mon, 21 Jan 2002 16:29:23 +0000
Subject: fixed network conf in auto install

---
 perl-install/install_steps.pm | 17 ++++++++++++++++-
 1 file changed, 16 insertions(+), 1 deletion(-)

(limited to 'perl-install')

diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm
index 03ffa01b3..b395a262f 100644
--- a/perl-install/install_steps.pm
+++ b/perl-install/install_steps.pm
@@ -584,7 +584,22 @@ sub configureNetwork {
     my ($o) = @_;
     require network;
     network::configureNetwork2($o, $o->{prefix}, $o->{netc}, $o->{intf});
-    $o->{netcnx} ||= 'lan';
+    if ($o->{method} eq "ftp" || $o->{method} eq "http" || $o->{method} eq "nfs") {
+	my $prefix = $o->{prefix};
+	my ($connect_file, $disconnect_file, $connect_prog) = 
+  ("/etc/sysconfig/network-scripts/net_cnx_up", "/etc/sysconfig/network-scripts/net_cnx_down", "/etc/sysconfig/network-scripts/net_cnx_pg");
+	$o->{netcnx}{type}='lan';
+	output "$prefix$connect_file",
+	  qq(
+ifup eth0
+);
+	output "$prefix$disconnect_file",
+	  qq(
+ifdown eth0
+);
+	chmod 0755, "$prefix$disconnect_file";
+	chmod 0755, "$prefix$connect_file";
+    }
 }
 
 #------------------------------------------------------------------------------
-- 
cgit v1.2.1