Lines 9-15
use C4::Output;
Link Here
|
9 |
use C4::Context; |
9 |
use C4::Context; |
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::Patron; |
13 |
use Koha::Patrons; |
13 |
use Koha::Patrons; |
14 |
my $query = CGI->new; |
14 |
my $query = CGI->new; |
15 |
use HTML::Entities; |
15 |
use HTML::Entities; |
Lines 42-49
my $errNoBorrowerFound;
Link Here
|
42 |
my $errNoBorrowerEmail; |
42 |
my $errNoBorrowerEmail; |
43 |
my $errMultipleAccountsForEmail; |
43 |
my $errMultipleAccountsForEmail; |
44 |
my $errAlreadyStartRecovery; |
44 |
my $errAlreadyStartRecovery; |
45 |
my $errTooManyEmailFound; |
|
|
46 |
my $errBadEmail; |
47 |
my $errResetForbidden; |
45 |
my $errResetForbidden; |
48 |
|
46 |
|
49 |
#new password form error |
47 |
#new password form error |
Lines 123-133
if ( $query->param('sendEmail') || $query->param('resendEmail') ) {
Link Here
|
123 |
if ($hasError) { |
121 |
if ($hasError) { |
124 |
$template->param( |
122 |
$template->param( |
125 |
hasError => 1, |
123 |
hasError => 1, |
126 |
|
|
|
127 |
errNoBorrowerFound => $errNoBorrowerFound, |
124 |
errNoBorrowerFound => $errNoBorrowerFound, |
128 |
errTooManyEmailFound => $errTooManyEmailFound, |
|
|
129 |
errAlreadyStartRecovery => $errAlreadyStartRecovery, |
125 |
errAlreadyStartRecovery => $errAlreadyStartRecovery, |
130 |
errBadEmail => $errBadEmail, |
|
|
131 |
errNoBorrowerEmail => $errNoBorrowerEmail, |
126 |
errNoBorrowerEmail => $errNoBorrowerEmail, |
132 |
errMultipleAccountsForEmail => $errMultipleAccountsForEmail, |
127 |
errMultipleAccountsForEmail => $errMultipleAccountsForEmail, |
133 |
errResetForbidden => $errResetForbidden, |
128 |
errResetForbidden => $errResetForbidden, |
134 |
- |
|
|