summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/authentication.pm22
1 files changed, 11 insertions, 11 deletions
diff --git a/perl-install/authentication.pm b/perl-install/authentication.pm
index 50f6e60de..b4ec0b422 100644
--- a/perl-install/authentication.pm
+++ b/perl-install/authentication.pm
@@ -63,17 +63,17 @@ sub ask_parameters {
#$netc->{LDAPDOMAIN} = $s;
$in->ask_from('',
- N("\nAuthentication LDAP\n"),
- [ { label => N("\nServer Information :")},
- { label => N("\tLDAP Server\n"), val => \$authentication->{LDAP_server} },
- { label => N("\tUse SSL connection"), val => \$authentication->{LDAP_ssl}, type => 'bool' },
- { label => N("\nUser Base :")},
- { label => N("\tBase :"), val => \$authentication->{LDAP_users_db} },
- { label => N("\tScope :\n"), val => \$authentication->{LDAP_scope}, list => [map {$_->[0] } group_by2(@scope)], format => sub { $scope{$_[0]} } },
- { label => N("\nBind Server :")},
- { label => N("\tUse Anonymous Bind"), val => \$anonymous, type => 'bool' },
- { label => N("\tDistinguished Name"), val => \$authentication->{LDAP_user}, disabled => sub { $anonymous } },
- { label => N("\tPassword\n"), val => \$authentication->{LDAP_passwd}, disabled => sub { $anonymous } },
+ "\n" . N("Authentication LDAP") . "\n",
+ [ { label => "\n" . N("Server Information:") },
+ { label => "\t" . N("LDAP Server") . "\n", val => \$authentication->{LDAP_server} },
+ { label => "\t" . N("Use SSL connection"), val => \$authentication->{LDAP_ssl}, type => 'bool' },
+ { label => "\n" . N("User Base:") },
+ { label => "\t" . N("Base:"), val => \$authentication->{LDAP_users_db} },
+ { label => "\t" . N("Scope:") . "\n", val => \$authentication->{LDAP_scope}, list => [map { $_->[0] } group_by2(@scope)], format => sub { $scope{$_[0]} } },
+ { label => "\n" . N("Bind Server:") . "\n" },
+ { label => "\t" . N("Use Anonymous Bind"), val => \$anonymous, type => 'bool' },
+ { label => "\t" . N("Distinguished Name"), val => \$authentication->{LDAP_user}, disabled => sub { $anonymous } },
+ { label => "\t" . N("Password") . "\n", val => \$authentication->{LDAP_passwd}, disabled => sub { $anonymous } },
]) or return;
} elsif ($kind eq 'AD') {