From fd59d25aad2bcaf4b110dfdf1a8f1b161fb092b1 Mon Sep 17 00:00:00 2001 From: Henri-Damien LAURENT Date: Tue, 18 Nov 2008 16:18:15 +0100 Subject: [PATCH] bug fix : 2805 deleting die on lack of user/password in config file. Signed-off-by: Galen Charlton --- C4/Auth_with_ldap.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/C4/Auth_with_ldap.pm b/C4/Auth_with_ldap.pm index e6ed181630..c2862759f1 100644 --- a/C4/Auth_with_ldap.pm +++ b/C4/Auth_with_ldap.pm @@ -52,8 +52,8 @@ my $context = C4::Context->new() or die 'C4::Context->new failed'; my $ldap = C4::Context->config("ldapserver") or die 'No "ldapserver" in server hash from KOHA_CONF: ' . $ENV{KOHA_CONF}; my $prefhost = $ldap->{hostname} or die ldapserver_error('hostname'); my $base = $ldap->{base} or die ldapserver_error('base'); -$ldapname = $ldap->{user} or die ldapserver_error('user'); -$ldappassword = $ldap->{pass} or die ldapserver_error('pass'); +$ldapname = $ldap->{user} ; +$ldappassword = $ldap->{pass} ; our %mapping = %{$ldap->{mapping}} or die ldapserver_error('mapping'); my @mapkeys = keys %mapping; $debug and print STDERR "Got ", scalar(@mapkeys), " ldap mapkeys ( total ): ", join ' ', @mapkeys, "\n"; -- 2.39.5