diff options
| author | Thierry Vignaud <tvignaud@mandriva.org> | 2004-03-03 08:47:54 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tvignaud@mandriva.org> | 2004-03-03 08:47:54 +0000 |
| commit | 5955beb52fe193105b1ef582f8eaac8db12686f3 (patch) | |
| tree | 5299d09159419b3602937c04f725c66847c8a827 /perl-install/network/netconnect.pm | |
| parent | 341342919b4cf50c946263cc90b58ff79d19b4af (diff) | |
| download | drakx-5955beb52fe193105b1ef582f8eaac8db12686f3.tar drakx-5955beb52fe193105b1ef582f8eaac8db12686f3.tar.gz drakx-5955beb52fe193105b1ef582f8eaac8db12686f3.tar.bz2 drakx-5955beb52fe193105b1ef582f8eaac8db12686f3.tar.xz drakx-5955beb52fe193105b1ef582f8eaac8db12686f3.zip | |
hide dns settings by default when using dhcp
Diffstat (limited to 'perl-install/network/netconnect.pm')
| -rw-r--r-- | perl-install/network/netconnect.pm | 15 |
1 files changed, 8 insertions, 7 deletions
diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm index b8771dc85..fa595776b 100644 --- a/perl-install/network/netconnect.pm +++ b/perl-install/network/netconnect.pm @@ -975,13 +975,14 @@ such as ``mybox.mylab.myco.com''. You may also enter the IP address of the gateway if you have one.") . N("Last but not least you can also type in your DNS server IP addresses."), data => sub { - [ { label => $auto_ip ? N("Host name (optional)") : N("Host name"), val => \$netc->{HOSTNAME}, advanced => $auto_ip }, - { label => N("DNS server 1"), val => \$netc->{dnsServer} }, - { label => N("DNS server 2"), val => \$netc->{dnsServer2} }, - { label => N("DNS server 3"), val => \$netc->{dnsServer3} }, - { label => N("Search domain"), val => \$netc->{DOMAINNAME}, - help => N("By default search domain will be set from the fully-qualified host name") }, - if_(!$auto_ip, { label => N("Gateway (e.g. %s)", $gateway_ex), val => \$netc->{GATEWAY} }, + [ { label => $auto_ip ? N("Host name (optional)") : N("Host name"), val => \$netc->{HOSTNAME} }, + if_(!$auto_ip, + { label => N("DNS server 1"), val => \$netc->{dnsServer} }, + { label => N("DNS server 2"), val => \$netc->{dnsServer2} }, + { label => N("DNS server 3"), val => \$netc->{dnsServer3} }, + { label => N("Search domain"), val => \$netc->{DOMAINNAME}, + help => N("By default search domain will be set from the fully-qualified host name") }, + { label => N("Gateway (e.g. %s)", $gateway_ex), val => \$netc->{GATEWAY} }, if_(@all_cards > 1, { label => N("Gateway device"), val => \$netc->{GATEWAYDEV}, list => [ sort keys %eth_intf ], format => sub { $eth_intf{$_[0]} } }, |