From 310a39bf670f568ae0c3bdbbfd30ce79c7c1ce72 Mon Sep 17 00:00:00 2001
From: Nick Clemens <nick@bywatersolutions.com>
Date: Thu, 27 Apr 2023 13:02:24 +0000
Subject: [PATCH] Bug 33611: Unit test

---
 t/db_dependent/Reserves.t | 28 +++++++++++++++++++++++++++-
 1 file changed, 27 insertions(+), 1 deletion(-)

diff --git a/t/db_dependent/Reserves.t b/t/db_dependent/Reserves.t
index 3371c9539d..e64393154e 100755
--- a/t/db_dependent/Reserves.t
+++ b/t/db_dependent/Reserves.t
@@ -17,7 +17,7 @@
 
 use Modern::Perl;
 
-use Test::More tests => 77;
+use Test::More tests => 78;
 use Test::MockModule;
 use Test::Warn;
 
@@ -1735,3 +1735,29 @@ subtest 'CanItemBeReserved() tests' => sub {
 
     $schema->storage->txn_rollback;
 };
+
+subtest 'DefaultHoldExpiration tests' => sub {
+    plan tests => 2;
+    $schema->storage->txn_begin;
+
+    t::lib::Mocks::mock_preference( 'DefaultHoldExpirationdate', 1 );
+    t::lib::Mocks::mock_preference( 'DefaultHoldExpirationdatePeriod', 365 );
+    t::lib::Mocks::mock_preference( 'DefaultHoldExpirationUnitOfTime', 'days;' );
+
+    my $patron  = $builder->build_object( { class => 'Koha::Patrons' } );
+    my $item    = $builder->build_sample_item();
+
+    my $reserve_id = AddReserve({
+        branchcode     => $item->homebranch,
+        borrowernumber => $patron->id,
+        biblionumber   => $item->biblionumber,
+    });
+
+    my $today = dt_from_string();
+    my $hold = Koha::Holds->find( $reserve_id );
+
+    is( $hold->reservedate, $today->ymd, "Hold created today" );
+    is( $hold->expirationdate, $today->add( days => 365)->ymd, "Reserve date set 1 year from today" );
+
+    $schema->txn_rollback;
+};
-- 
2.30.2