From 40a1ab9db1fd71b09f7299d638d3404ea039eda8 Mon Sep 17 00:00:00 2001
From: Pedro Amorim <pedro.amorim@ptfs-europe.com>
Date: Mon, 5 Feb 2024 14:48:48 -0100
Subject: [PATCH] Bug 34478: ILL INTRA: cancel to cud-cancel

cancel -> cud-cancel

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
---
 ill/ill-requests.pl                                         | 1 +
 koha-tmpl/intranet-tmpl/prog/en/modules/ill/ill-requests.tt | 2 +-
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/ill/ill-requests.pl b/ill/ill-requests.pl
index 253bf1a249..83ec825859 100755
--- a/ill/ill-requests.pl
+++ b/ill/ill-requests.pl
@@ -56,6 +56,7 @@ Koha::Illrequest->check_url_param_deprecation($params);
 
 my $op = $params->{op} // $params->{method} // 'illlist';
 $op = 'cud-create' if $op eq 'create';
+$op = 'cud-cancel' if $op eq 'cancel';
 
 my ( $template, $patronnumber, $cookie ) = get_template_and_user( {
     template_name => 'ill/ill-requests.tt',
diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/ill/ill-requests.tt b/koha-tmpl/intranet-tmpl/prog/en/modules/ill/ill-requests.tt
index 68cb72b3ff..a98d9f28bd 100644
--- a/koha-tmpl/intranet-tmpl/prog/en/modules/ill/ill-requests.tt
+++ b/koha-tmpl/intranet-tmpl/prog/en/modules/ill/ill-requests.tt
@@ -149,7 +149,7 @@
                     <h1>Confirm ILL request</h1>
                     [% PROCESS $whole.template %]
 
-                [% ELSIF query_type == 'cancel' and !whole.error %]
+                [% ELSIF query_type == 'cud-cancel' and !whole.error %]
                     <h1>Cancel a confirmed request</h1>
                     [% PROCESS $whole.template %]
 
-- 
2.39.5