From e8c29581998c88c7ec255d5b02549815a722929d Mon Sep 17 00:00:00 2001 From: Guillaume Cottenceau Date: Tue, 6 Mar 2001 22:50:05 +0000 Subject: fix save of automatic stage1 info for static network --- perl-install/install_any.pm | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) (limited to 'perl-install') diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index 81a3f0c91..8147dd73c 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -609,8 +609,6 @@ sub loadO { sub generate_automatic_stage1_params { my ($o) = @_; - - return if $o->{method} =~ /hd|cdrom/; my $ks = "automatic="; @@ -635,7 +633,7 @@ sub generate_automatic_stage1_params { $ks .= "network:dhcp,"; } else { require network; - $ks .= "ip:$intf->{IPADDR},netmask:$intf->{NETMASK},gateway:$o->{netc}{GATEWAY},"; + $ks .= "network:static,ip:$intf->{IPADDR},netmask:$intf->{NETMASK},gateway:$o->{netc}{GATEWAY},"; my @dnss = network::dnsServers($o->{netc}); $ks .= "dns:$dnss[0]," if @dnss; } -- cgit v1.2.1