From bb0ca0af4d4d7c0580dc9da70eb930e1f6139bc4 Mon Sep 17 00:00:00 2001 From: Julian Maurice Date: Fri, 5 Apr 2024 14:03:05 +0200 Subject: [PATCH] Bug 35959: Fix C3 merge of Koha::Old::Hold Test plan: Run `perl -c Koha/Old/Hold.pm` It should print 'syntax OK' Signed-off-by: David Nind --- C4/Reserves.pm | 2 +- Koha/Hold.pm | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/C4/Reserves.pm b/C4/Reserves.pm index 6624fe9082..2e599c0fde 100644 --- a/C4/Reserves.pm +++ b/C4/Reserves.pm @@ -44,7 +44,6 @@ use Koha::Holds; use Koha::ItemTypes; use Koha::Items; use Koha::Libraries; -use Koha::Old::Holds; use Koha::Patrons; use Koha::Plugins; use Koha::Policy::Holds; @@ -1602,6 +1601,7 @@ sub _FixPriority { $hold = Koha::Holds->find( $reserve_id ); if (!defined $hold){ # may have already been checked out and hold fulfilled + require Koha::Old::Holds; $hold = Koha::Old::Holds->find( $reserve_id ); } return unless $hold; diff --git a/Koha/Hold.pm b/Koha/Hold.pm index 12109ad573..1faec873ec 100644 --- a/Koha/Hold.pm +++ b/Koha/Hold.pm @@ -34,7 +34,6 @@ use Koha::Biblios; use Koha::Hold::CancellationRequests; use Koha::Items; use Koha::Libraries; -use Koha::Old::Holds; use Koha::Calendar; use Koha::Plugins; @@ -1014,6 +1013,7 @@ Move a hold to the old_reserve table following the same pattern as Koha::Patron- sub _move_to_old { my ($self) = @_; my $hold_infos = $self->unblessed; + require Koha::Old::Hold; return Koha::Old::Hold->new( $hold_infos )->store; } -- 2.39.2