diff --git a/opac/opac-memberentry.pl b/opac/opac-memberentry.pl index 5a92243c67..eaf3792465 100755 --- a/opac/opac-memberentry.pl +++ b/opac/opac-memberentry.pl @@ -349,6 +349,7 @@ if ( $op eq 'cud-create' ) { Koha::Patron::Modifications->search( { borrowernumber => $borrowernumber } )->delete; + $borrower_changes{verification_token} = q{}; # prevent warn Missing value for PK column my $m = Koha::Patron::Modification->new( \%borrower_changes )->store(); #Automatically approve patron profile changes if set in syspref