@@ -, +, @@ to local auth --- C4/Auth.pm | 2 +- C4/Auth_with_ldap.pm | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) --- a/C4/Auth.pm +++ a/C4/Auth.pm @@ -1524,7 +1524,7 @@ sub checkpw { if ($ldap) { $debug and print STDERR "## checkpw - checking LDAP\n"; my ($retval,$retcard,$retuserid) = checkpw_ldap(@_); # EXTERNAL AUTH - return 0 if $retval == -1; + return 0 if $retval == -1; # Incorrect password for LDAP login attempt ($retval) and return ($retval,$retcard,$retuserid); } --- a/C4/Auth_with_ldap.pm +++ a/C4/Auth_with_ldap.pm @@ -145,7 +145,7 @@ sub checkpw_ldap { my $res = $db->bind( $principal_name, password => $password ); if ( $res->code ) { warn "LDAP bind failed as kohauser $userid: " . description($res); - return 0; + return -1; } if ( !defined($userldapentry) && ( $config{update} or $config{replicate} ) ) --