From 937943b4502499a9afae32313f47a73352a21a41 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Fri, 5 Jan 2001 17:12:51 +0000 Subject: move to new ask_from's: - ask_from_entries_ref is deprecated, use ask_from_entries_refH - ask_from_list now calls ask_from_entries_refH_powered still not done: - ask_from_treelist should use ask_from_entries_refH_powered, and lists with no help should use CList (List is bad) - keyboard and mouse binding is still rough - enhance the look --- perl-install/install_steps_interactive.pm | 7 +++---- 1 file changed, 3 insertions(+), 4 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 2cdcc6bb7..eb57552d2 100644 --- a/perl-install/install_steps_interactive.pm +++ b/perl-install/install_steps_interactive.pm @@ -772,11 +772,10 @@ _("Use NIS") => { val => \$nis, type => 'bool', text => _("yellow pages") }, ) or return; $o->{authentication}{NIS} &&= $nis; - $o->ask_from_entries_ref('', + $o->ask_from_entries_refH('', _("Authentification NIS"), - [ _("NIS Domain"), _("NIS Server") ], - [ \ ($o->{netc}{NISDOMAIN} ||= $o->{netc}{DOMAINNAME}), - { val => \$o->{authentication}{NIS}, list => ["broadcast"] }, + [ { label => _("NIS Domain"), val => \ ($o->{netc}{NISDOMAIN} ||= $o->{netc}{DOMAINNAME}) }, + { label => _("NIS Server"), val => \$o->{authentication}{NIS}, list => ["broadcast"] }, ]) if $nis; install_steps::setRootPassword($o); } -- cgit v1.2.1