diff options
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/network.pm | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/perl-install/network.pm b/perl-install/network.pm index 45ddb7d5b..d90b6597a 100644 --- a/perl-install/network.pm +++ b/perl-install/network.pm @@ -70,11 +70,7 @@ sub write_conf { FORWARD_IPV4 => "false", HOSTNAME => "localhost.localdomain", }); - print "-------------------\nDOMAINNAME : $netc->{DOMAINNAME}\n-------------------\n"; - ($netc->{DOMAINNAME}) = ($netc->{HOSTNAME} =~ /\.(.*)/); - - print "------------------\nHOSTNAME : $netc->{HOSTNAME}\n-------------------\n"; - print "-------------------\nDOMAINNAME : $netc->{DOMAINNAME}\n-------------------\n"; + ($netc->{DOMAINNAME}) = ($netc->{HOSTNAME} =~ /\.(.*)/); setVarsInSh($file, $netc, qw(NETWORKING FORWARD_IPV4 DHCP_HOSTNAME HOSTNAME DOMAINNAME GATEWAY GATEWAYDEV NISDOMAIN)); } |