diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2001-01-06 17:07:15 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2001-01-06 17:07:15 +0000 |
commit | dabe48195cab109ba9cb2bd179500ef481d53348 (patch) | |
tree | aabb59ee38f421a9172b42d94706e4355c776ca0 /perl-install/network.pm | |
parent | 937943b4502499a9afae32313f47a73352a21a41 (diff) | |
download | drakx-dabe48195cab109ba9cb2bd179500ef481d53348.tar drakx-dabe48195cab109ba9cb2bd179500ef481d53348.tar.gz drakx-dabe48195cab109ba9cb2bd179500ef481d53348.tar.bz2 drakx-dabe48195cab109ba9cb2bd179500ef481d53348.tar.xz drakx-dabe48195cab109ba9cb2bd179500ef481d53348.zip |
ask_from_entries_refH parameter format has changed so change all accesses to it.
Diffstat (limited to 'perl-install/network.pm')
-rw-r--r-- | perl-install/network.pm | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/perl-install/network.pm b/perl-install/network.pm index f5fe364fb..6ed925406 100644 --- a/perl-install/network.pm +++ b/perl-install/network.pm @@ -345,10 +345,12 @@ _("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") => \$netc->{HOSTNAME}, - _("DNS server") => \$netc->{dnsServer}, - _("Gateway") => \$netc->{GATEWAY}, - $::expert ? (_("Gateway device") => {val => \$netc->{GATEWAYDEV}, list => \@devices }) : (), + [ { label => _("Host name"), val => \$netc->{HOSTNAME} }, + { label => _("DNS server"), val => \$netc->{dnsServer} }, + { label => _("Gateway"), val => \$netc->{GATEWAY} }, + if_($::expert, + { label => _("Gateway device"), val => \$netc->{GATEWAYDEV}, list => \@devices }, + ), ], ) or return; } |