Lines 197-202
if ( $op eq 'cud-create' ) {
Link Here
|
197 |
$borrower{verification_token} = $verification_token; |
197 |
$borrower{verification_token} = $verification_token; |
198 |
|
198 |
|
199 |
$borrower{extended_attributes} = to_json($attributes); |
199 |
$borrower{extended_attributes} = to_json($attributes); |
|
|
200 |
$borrower{borrowernumber} = 0; # prevent warn Missing value for PK column |
200 |
Koha::Patron::Modification->new( \%borrower )->store(); |
201 |
Koha::Patron::Modification->new( \%borrower )->store(); |
201 |
|
202 |
|
202 |
#Send verification email |
203 |
#Send verification email |
203 |
- |
|
|