summaryrefslogtreecommitdiffstats
path: root/perl-install/network/network.pm
diff options
context:
space:
mode:
authordamien <damien@mandriva.com>2002-01-10 15:26:26 +0000
committerdamien <damien@mandriva.com>2002-01-10 15:26:26 +0000
commit9eb1688b18e4241692b80afd363cdce2a1b1b844 (patch)
treeaa875a241294f7ba8b1697e89fb379cb3035b988 /perl-install/network/network.pm
parent6133180ed6fbecc3a345c1721b64d38d6483ffa2 (diff)
downloaddrakx-9eb1688b18e4241692b80afd363cdce2a1b1b844.tar
drakx-9eb1688b18e4241692b80afd363cdce2a1b1b844.tar.gz
drakx-9eb1688b18e4241692b80afd363cdce2a1b1b844.tar.bz2
drakx-9eb1688b18e4241692b80afd363cdce2a1b1b844.tar.xz
drakx-9eb1688b18e4241692b80afd363cdce2a1b1b844.zip
domainname corection
Diffstat (limited to 'perl-install/network/network.pm')
-rw-r--r--perl-install/network/network.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/network/network.pm b/perl-install/network/network.pm
index ee62d089d..cfcb9ac31 100644
--- a/perl-install/network/network.pm
+++ b/perl-install/network/network.pm
@@ -66,12 +66,12 @@ sub down_it {
sub write_conf {
my ($file, $netc) = @_;
+ ($netc->{DOMAINNAME}) ||= 'localdomain';
add2hash($netc, {
NETWORKING => "yes",
FORWARD_IPV4 => "false",
- HOSTNAME => "localhost.localdomain",
+ HOSTNAME => "localhost.$netc->{DOMAINNAME}",
});
- ($netc->{DOMAINNAME}) ||= ($netc->{HOSTNAME} =~ /\.(.*)/);
setVarsInSh($file, $netc, qw(NETWORKING FORWARD_IPV4 DHCP_HOSTNAME HOSTNAME DOMAINNAME GATEWAY GATEWAYDEV NISDOMAIN));
}