View | Details | Raw Unified | Return to bug 7766
Collapse All | Expand All

(-)a/C4/Auth.pm (-1 / +1 lines)
Lines 1409-1415 sub checkpw { Link Here
1409
1409
1410
    my ( $dbh, $userid, $password, $query ) = @_;
1410
    my ( $dbh, $userid, $password, $query ) = @_;
1411
    if ($ldap) {
1411
    if ($ldap) {
1412
        $debug and print "## checkpw - checking LDAP\n";
1412
        $debug and print STDERR "## checkpw - checking LDAP\n";
1413
        my ($retval,$retcard,$retuserid) = checkpw_ldap(@_);    # EXTERNAL AUTH
1413
        my ($retval,$retcard,$retuserid) = checkpw_ldap(@_);    # EXTERNAL AUTH
1414
        ($retval) and return ($retval,$retcard,$retuserid);
1414
        ($retval) and return ($retval,$retcard,$retuserid);
1415
    }
1415
    }

Return to bug 7766