From 354b9f730c0eb4573ac9715d3969efa1be83515a Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Mon, 8 Sep 2008 10:07:55 +0000 Subject: improve drakauth GUI --- perl-install/standalone/drakauth | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'perl-install/standalone/drakauth') diff --git a/perl-install/standalone/drakauth b/perl-install/standalone/drakauth index 56cf23447..be6f0cf43 100755 --- a/perl-install/standalone/drakauth +++ b/perl-install/standalone/drakauth @@ -24,9 +24,10 @@ my $meta_class = { getVarsFromSh("/etc/sysconfig/system") }->{META_CLASS}; my @kinds = authentication::kinds($in->do_pkgs, $meta_class); main: -$in->ask_from(N("Authentication"), authentication::kind2description(@kinds), +$in->ask_from(N("Authentication"), undef, [ - { label => N("Authentication"), val => \$kind, type => 'list' , list => \@kinds, format => \&authentication::kind2name }, + { label => N("Authentication") }, + { val => \$kind, type => 'list' , list => \@kinds, format => \&authentication::kind2description }, ]) or $in->exit; authentication::ask_parameters($in, $net, $authentication, $kind) or goto main; -- cgit v1.2.1