Lines 349-354
if ( $op eq 'cud-create' ) {
Link Here
|
349 |
|
349 |
|
350 |
Koha::Patron::Modifications->search( { borrowernumber => $borrowernumber } )->delete; |
350 |
Koha::Patron::Modifications->search( { borrowernumber => $borrowernumber } )->delete; |
351 |
|
351 |
|
|
|
352 |
$borrower_changes{verification_token} = q{}; # prevent warn Missing value for PK column |
352 |
my $m = Koha::Patron::Modification->new( \%borrower_changes )->store(); |
353 |
my $m = Koha::Patron::Modification->new( \%borrower_changes )->store(); |
353 |
|
354 |
|
354 |
#Automatically approve patron profile changes if set in syspref |
355 |
#Automatically approve patron profile changes if set in syspref |
355 |
- |
|
|