From 0e1239e93bb162c1b83f9f11accb21494abc57e2 Mon Sep 17 00:00:00 2001
From: Nick Clemens <nick@bywatersolutions.com>
Date: Fri, 26 Jan 2024 11:01:18 -0500
Subject: [PATCH] Bug 34478: Manual fix - fix ops and method - deletemem

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
---
 .../intranet-tmpl/prog/en/modules/members/deletemem.tt      | 4 ++--
 members/deletemem.pl                                        | 6 +++---
 2 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/members/deletemem.tt b/koha-tmpl/intranet-tmpl/prog/en/modules/members/deletemem.tt
index 70e22fea67..c164cdd3ea 100644
--- a/koha-tmpl/intranet-tmpl/prog/en/modules/members/deletemem.tt
+++ b/koha-tmpl/intranet-tmpl/prog/en/modules/members/deletemem.tt
@@ -71,10 +71,10 @@
             [% END %]
             <h1>Are you sure you want to delete the patron [% patron.firstname | html %] [% patron.surname | html %]?</h1>
             <p>This cannot be undone.</p>
-            <form method="get" action="/cgi-bin/koha/members/deletemem.pl">
+            <form method="post" action="/cgi-bin/koha/members/deletemem.pl">
                 [% INCLUDE 'csrf-token.inc' %]
                 <input type="hidden" name="member" value="[% patron.borrowernumber | html %]"/>
-                <input type="hidden" name="op" value="delete_confirmed" />
+                <input type="hidden" name="op" value="cud-delete_confirmed" />
                 <button type="submit" class="approve"><i class="fa fa-fw fa-check"></i> Yes, delete</button>
             </form>
             <form method="get" action="/cgi-bin/koha/members/moremember.pl">
diff --git a/members/deletemem.pl b/members/deletemem.pl
index 4b2b5b6190..6d947611df 100755
--- a/members/deletemem.pl
+++ b/members/deletemem.pl
@@ -92,7 +92,7 @@ if ( my $anonymous_patron = C4::Context->preference("AnonymousPatron") ) {
     }
 }
 
-my $op = $input->param('op') || 'cud-delete_confirm';
+my $op = $input->param('op') || 'delete_confirm';
 my $dbh = C4::Context->dbh;
 my $is_guarantor = $patron->guarantee_relationships->count;
 my $countholds = $dbh->selectrow_array("SELECT COUNT(*) FROM reserves WHERE borrowernumber=?", undef, $member);
@@ -111,9 +111,9 @@ $template->param(
     ItemsOnHold   => $countholds,
 );
 
-if ( $op eq 'cud-delete_confirm' or $countissues > 0 or $debits or $is_guarantor ) {
+if ( $op eq 'delete_confirm' or $countissues > 0 or $debits or $is_guarantor ) {
     $template->param(
-        op         => 'cud-delete_confirm',
+        op         => 'delete_confirm',
     );
 
 } elsif ( $op eq 'cud-delete_confirmed' ) {
-- 
2.39.5