From ef3ce36c2a0e4f385c65ca6223ba4c5c4e86e122 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Sun, 19 Dec 1999 01:45:46 +0000 Subject: no_comment --- perl-install/install_steps_interactive.pm | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'perl-install/install_steps_interactive.pm') diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm index 2999ba682..417f64e58 100644 --- a/perl-install/install_steps_interactive.pm +++ b/perl-install/install_steps_interactive.pm @@ -347,7 +347,6 @@ notation (for example, 1.2.3.4)."), focus_out => sub { $intf->{NETMASK} = network::netmask($intf->{IPADDR}) unless $_[0] } - ); } @@ -362,7 +361,7 @@ _("Please enter your host name. Your host name should be a fully-qualified host name, such as ``mybox.mylab.myco.com''. You may also enter the IP address of the gateway if you have one"), - [_("Host name:"), _("DNS server:"), _("Gateway:"), !$::beginner ? _("Gateway device:") : ()], + [_("Host name:"), _("DNS server:"), _("Gateway:"), $::expert ? _("Gateway device:") : ()], [(map { \$netc->{$_}} qw(HOSTNAME dnsServer GATEWAY)), {val => \$netc->{GATEWAYDEV}, list => \@devices}] ); -- cgit v1.2.1