summaryrefslogtreecommitdiffstats
path: root/perl-install/network.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2001-01-06 17:07:15 +0000
committerPascal Rigaux <pixel@mandriva.com>2001-01-06 17:07:15 +0000
commitdabe48195cab109ba9cb2bd179500ef481d53348 (patch)
treeaabb59ee38f421a9172b42d94706e4355c776ca0 /perl-install/network.pm
parent937943b4502499a9afae32313f47a73352a21a41 (diff)
downloaddrakx-backup-do-not-use-dabe48195cab109ba9cb2bd179500ef481d53348.tar
drakx-backup-do-not-use-dabe48195cab109ba9cb2bd179500ef481d53348.tar.gz
drakx-backup-do-not-use-dabe48195cab109ba9cb2bd179500ef481d53348.tar.bz2
drakx-backup-do-not-use-dabe48195cab109ba9cb2bd179500ef481d53348.tar.xz
drakx-backup-do-not-use-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.pm10
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;
}