From 9524c1d76169e213403e36673fe9542c9dd4943a Mon Sep 17 00:00:00 2001 From: Martin Renvoize Date: Tue, 19 Nov 2019 16:59:06 +0000 Subject: [PATCH] Bug 23634: (follow-up) Prevent updates on POST Signed-off-by: Martin Renvoize Signed-off-by: Tomas Cohen Arazi Signed-off-by: Marcel de Rooy Signed-off-by: Jonathan Druart --- members/memberentry.pl | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/members/memberentry.pl b/members/memberentry.pl index eb0ebf5b51..951dfd9e2c 100755 --- a/members/memberentry.pl +++ b/members/memberentry.pl @@ -525,6 +525,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}; -- 2.39.5