|
Lines 38-44
my $token = $cgi->param('token');
Link Here
|
| 38 |
my $m = Koha::Patron::Modifications->find( { verification_token => $token } ); |
38 |
my $m = Koha::Patron::Modifications->find( { verification_token => $token } ); |
| 39 |
|
39 |
|
| 40 |
my ( $template, $borrowernumber, $cookie ); |
40 |
my ( $template, $borrowernumber, $cookie ); |
| 41 |
if ( $m ) { |
41 |
|
|
|
42 |
if ( |
| 43 |
$m # The token exists and the email is unique if requested |
| 44 |
and not( |
| 45 |
C4::Context->preference('PatronSelfRegistrationEmailMustBeUnique') |
| 46 |
and Koha::Patrons->search( { email => $m->email } )->count |
| 47 |
) |
| 48 |
) |
| 49 |
{ |
| 42 |
( $template, $borrowernumber, $cookie ) = get_template_and_user( |
50 |
( $template, $borrowernumber, $cookie ) = get_template_and_user( |
| 43 |
{ |
51 |
{ |
| 44 |
template_name => "opac-registration-confirmation.tt", |
52 |
template_name => "opac-registration-confirmation.tt", |
| 45 |
- |
|
|