From a5543c2f4625d590a62217de0d6cc003fb75814f Mon Sep 17 00:00:00 2001
From: Damien Chaumette <dchaumette@mandriva.com>
Date: Fri, 31 Jan 2003 17:32:17 +0000
Subject: more zeroconf configuration

---
 perl-install/network/network.pm | 9 +++++++++
 1 file changed, 9 insertions(+)

(limited to 'perl-install/network')

diff --git a/perl-install/network/network.pm b/perl-install/network/network.pm
index cd8234fb9..ad2a78be0 100644
--- a/perl-install/network/network.pm
+++ b/perl-install/network/network.pm
@@ -73,6 +73,13 @@ sub write_conf {
     setVarsInSh($file, $netc, if_(!$netc->{DHCP}, 'HOSTNAME'), qw(NETWORKING FORWARD_IPV4 DOMAINNAME GATEWAY GATEWAYDEV NISDOMAIN));
 }
 
+sub write_zeroconf {
+    my ($file, $netc);
+    my %zeroconf_file = getVarsFromSh($file) or die "cannot open file $file: $!";
+    $zeroconf_file{hostname} = $netc->{ZEROCONF_HOSTNAME};
+    setVarsInSh($file, %zeroconf_file);
+}
+
 sub write_resolv_conf {
     my ($file, $netc) = @_;
 
@@ -501,6 +508,8 @@ sub configureNetwork2 {
 	$in->do_pkgs->install('pump');
     }
     #-res_init();		#- reinit the resolver so DNS changes take affect
+    
+    write_zeroconf('/etc/tmdns.conf', $netc) if $netc->{ZEROCONF_HOSTNAME};
 
     proxy_configure($::o->{miscellaneous});
 }
-- 
cgit v1.2.1