diff options
author | damien <damien@mandriva.com> | 2000-09-26 16:11:04 +0000 |
---|---|---|
committer | damien <damien@mandriva.com> | 2000-09-26 16:11:04 +0000 |
commit | 5088bd44d2469cbcd9e58ee8f6cae74bc9e43cfd (patch) | |
tree | 40d7cbe552667982960cb77a93b101f6c82d3558 /perl-install/network.pm | |
parent | d6c00adf084ea92e1db0735ea8f0a19157882391 (diff) | |
download | drakx-5088bd44d2469cbcd9e58ee8f6cae74bc9e43cfd.tar drakx-5088bd44d2469cbcd9e58ee8f6cae74bc9e43cfd.tar.gz drakx-5088bd44d2469cbcd9e58ee8f6cae74bc9e43cfd.tar.bz2 drakx-5088bd44d2469cbcd9e58ee8f6cae74bc9e43cfd.tar.xz drakx-5088bd44d2469cbcd9e58ee8f6cae74bc9e43cfd.zip |
set help.
Diffstat (limited to 'perl-install/network.pm')
-rw-r--r-- | perl-install/network.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/network.pm b/perl-install/network.pm index bfc94ed96..75d29537f 100644 --- a/perl-install/network.pm +++ b/perl-install/network.pm @@ -267,6 +267,7 @@ sub configureNetwork { #- } if ($last->{BOOTPROTO} =~ /^(dhcp|bootp)$/) { my $dhcp_hostname = $netc->{HOSTNAME}; + $::isInstall and $in->set_help('configureNetworkHostDHCP'); $in->ask_from_entries_ref(_("Configuring network"), _("Please enter your host name if you know it. Some DHCP servers require the hostname to work. @@ -328,6 +329,7 @@ sub configureNetworkNet { $netc->{dnsServer} ||= dns($intf->{IPADDR}); $netc->{GATEWAY} ||= gateway($intf->{IPADDR}); + $::isInstall and $in->set_help('configureNetworkHost'); $in->ask_from_entries_refH(_("Configuring network"), _("Please enter your host name. Your host name should be a fully-qualified host name, @@ -344,7 +346,7 @@ You may also enter the IP address of the gateway if you have one"), sub miscellaneousNetwork { my ($in, $clicked) = @_; my $u = $::o->{miscellaneous} ||= {}; - $::isStandalone or $in->set_help('configureNetworkProxy'); + $::isInstall and $in->set_help('configureNetworkProxy'); !$::beginner || $clicked and $in->ask_from_entries_ref('', _("Proxies configuration"), [ _("HTTP proxy"), |