Lines 10-16
use C4::Context;
Link Here
|
10 |
use Koha::Patron::Password::Recovery |
10 |
use Koha::Patron::Password::Recovery |
11 |
qw(SendPasswordRecoveryEmail ValidateBorrowernumber GetValidLinkInfo CompletePasswordRecovery DeleteExpiredPasswordRecovery); |
11 |
qw(SendPasswordRecoveryEmail ValidateBorrowernumber GetValidLinkInfo CompletePasswordRecovery DeleteExpiredPasswordRecovery); |
12 |
use Koha::Patrons; |
12 |
use Koha::Patrons; |
13 |
use Koha::Patrons; |
|
|
14 |
my $query = CGI->new; |
13 |
my $query = CGI->new; |
15 |
use HTML::Entities; |
14 |
use HTML::Entities; |
16 |
use Try::Tiny; |
15 |
use Try::Tiny; |
Lines 42-49
my $errNoBorrowerFound;
Link Here
|
42 |
my $errNoBorrowerEmail; |
41 |
my $errNoBorrowerEmail; |
43 |
my $errMultipleAccountsForEmail; |
42 |
my $errMultipleAccountsForEmail; |
44 |
my $errAlreadyStartRecovery; |
43 |
my $errAlreadyStartRecovery; |
45 |
my $errTooManyEmailFound; |
|
|
46 |
my $errBadEmail; |
47 |
my $errResetForbidden; |
44 |
my $errResetForbidden; |
48 |
|
45 |
|
49 |
#new password form error |
46 |
#new password form error |
Lines 123-133
if ( $query->param('sendEmail') || $query->param('resendEmail') ) {
Link Here
|
123 |
if ($hasError) { |
120 |
if ($hasError) { |
124 |
$template->param( |
121 |
$template->param( |
125 |
hasError => 1, |
122 |
hasError => 1, |
126 |
|
|
|
127 |
errNoBorrowerFound => $errNoBorrowerFound, |
123 |
errNoBorrowerFound => $errNoBorrowerFound, |
128 |
errTooManyEmailFound => $errTooManyEmailFound, |
|
|
129 |
errAlreadyStartRecovery => $errAlreadyStartRecovery, |
124 |
errAlreadyStartRecovery => $errAlreadyStartRecovery, |
130 |
errBadEmail => $errBadEmail, |
|
|
131 |
errNoBorrowerEmail => $errNoBorrowerEmail, |
125 |
errNoBorrowerEmail => $errNoBorrowerEmail, |
132 |
errMultipleAccountsForEmail => $errMultipleAccountsForEmail, |
126 |
errMultipleAccountsForEmail => $errMultipleAccountsForEmail, |
133 |
errResetForbidden => $errResetForbidden, |
127 |
errResetForbidden => $errResetForbidden, |
134 |
- |
|
|