diff --git a/opac/opac-password-recovery.pl b/opac/opac-password-recovery.pl index a695165b56..0a54fc24f2 100755 --- a/opac/opac-password-recovery.pl +++ b/opac/opac-password-recovery.pl @@ -85,7 +85,7 @@ if ( $query->param('sendEmail') || $query->param('resendEmail') ) { $firstNonEmptyEmail = $emails[0] if @emails; # Is the given email one of the borrower's ? - if ( $email && !( any { /^$email$/i } @emails ) ) { + if ( $email && !( any { lc($_) eq lc($email) } @emails ) ) { $hasError = 1; $errNoBorrowerFound = 1; }