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

(-)a/opac/opac-password-recovery.pl (-3 / +2 lines)
Lines 73-79 if ( $query->param('sendEmail') || $query->param('resendEmail') ) { Link Here
73
        $errMultipleAccountsForEmail = 1;
73
        $errMultipleAccountsForEmail = 1;
74
    }
74
    }
75
    elsif ( $borrower = $search_results->next() ) {    # One matching borrower
75
    elsif ( $borrower = $search_results->next() ) {    # One matching borrower
76
        my @emails = ( $borrower->email, $borrower->emailpro, $borrower->B_email );
76
        my @emails = ( $borrower->email || '', $borrower->emailpro || '', $borrower->B_email || '');
77
77
78
        my $firstNonEmptyEmail = '';
78
        my $firstNonEmptyEmail = '';
79
        foreach my $address ( @emails ) {
79
        foreach my $address ( @emails ) {
Lines 82-88 if ( $query->param('sendEmail') || $query->param('resendEmail') ) { Link Here
82
        }
82
        }
83
83
84
        # Is the given email one of the borrower's ?
84
        # Is the given email one of the borrower's ?
85
        if ( $email && !( grep { $_ eq $email } @emails ) ) {
85
        if ( $email && !( grep /^$emails$/i, @emails ) ) {
86
            $hasError    = 1;
86
            $hasError    = 1;
87
            $errNoBorrowerFound = 1;
87
            $errNoBorrowerFound = 1;
88
        }
88
        }
89
- 

Return to bug 20023