@@ -, +, @@ --- members/memberentry.pl | 7 +++++++ 1 file changed, 7 insertions(+) --- a/members/memberentry.pl +++ a/members/memberentry.pl @@ -526,6 +526,13 @@ if ((!$nok) and $nodouble and ($op eq 'insert' or $op eq 'save')){ } $patron = Koha::Patrons->find( $borrowernumber ); + + if ($NoUpdateEmail) { + delete $newdata{'email'}; + delete $newdata{'emailpro'}; + delete $newdata{'B_email'}; + } + $newdata{debarredcomment} = $newdata{debarred_comment}; delete $newdata{debarred_comment}; delete $newdata{password2}; --