From 6f510204db869b459662ac4d75fed6198b6efd78 Mon Sep 17 00:00:00 2001 From: Baptiste Wojtkowski Date: Fri, 25 Jul 2025 12:51:19 +0000 Subject: [PATCH] Bug 40515: Fix regexp for cud-mark_as_lost_and_notify --- circ/pendingreserves.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/circ/pendingreserves.pl b/circ/pendingreserves.pl index 5ce792a1a9..5ab87450f6 100755 --- a/circ/pendingreserves.pl +++ b/circ/pendingreserves.pl @@ -47,7 +47,7 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user( query => $input, type => "intranet", flagsrequired => { circulate => "circulate_remaining_permissions" }, - } +} ); my @messages; @@ -58,7 +58,7 @@ if ( $op eq 'cud-cancel_reserve' and $reserve_id ) { $hold->cancel( { cancellation_reason => $cancellation_reason } ); push @messages, { type => 'message', code => 'hold_cancelled' }; } -} elsif ( $op =~ m|^mark_as_lost| ) { +} elsif ( $op eq 'cud-mark_as_lost' or $op eq 'cud-mark_as_lost_and_notify' ) { my $hold = Koha::Holds->find($reserve_id); die "wrong reserve_id" unless $hold; # This is a bit rude, but we are not supposed to get a wrong reserve_id my $item = $hold->item; -- 2.43.0