use correct connection string for AD auth (use encryption and port info).

This commit is contained in:
Dietmar Maurer 2014-05-22 07:12:25 +02:00
parent 396034e443
commit 11a9043610

View File

@ -80,7 +80,7 @@ my $authenticate_user_ad = sub {
my $scheme = $config->{secure} ? 'ldaps' : 'ldap';
my $conn_string = "$scheme://${server}:$port";
my $ldap = Net::LDAP->new($server) || die "$@\n";
my $ldap = Net::LDAP->new($conn_string) || die "$@\n";
$username = "$username\@$config->{domain}"
if $username !~ m/@/ && $config->{domain};