From 7639d230b844648b4d4b6d2ed00830c42a46b1e4 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Wed, 12 Nov 2003 12:29:56 +0000 Subject: reuse is_dynamic_ip() to not bother asking about zeroconf specific stuff when there's not any dynamic interfaces --- perl-install/network/network.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/network') diff --git a/perl-install/network/network.pm b/perl-install/network/network.pm index d85284b50..f8f82604e 100644 --- a/perl-install/network/network.pm +++ b/perl-install/network/network.pm @@ -421,7 +421,7 @@ You may also enter the IP address of the gateway if you have one.") . N(" Enter a Zeroconf host name without any dot if you don't want to use the default host name."), [ { label => N("Host name"), val => \$netc->{HOSTNAME} }, - { label => N("Zeroconf Host name"), val => \$netc->{ZEROCONF_HOSTNAME} }, + { label => N("Zeroconf Host name"), val => \$netc->{ZEROCONF_HOSTNAME}, disabled => sub { is_dynamic_ip($intf) } }, { label => N("DNS server"), val => \$netc->{dnsServer} }, { label => N("Gateway (e.g. %s)", $gateway_ex), val => \$netc->{GATEWAY} }, if_(@devices > 1, -- cgit v1.2.1