From 8fc3531e079d076a3212b2aa76525b5ca6e874bd Mon Sep 17 00:00:00 2001 From: David Cook Date: Thu, 20 Jul 2023 02:39:27 +0000 Subject: [PATCH] Bug 30362: Fix GetSoonestRenewDate to really return soonest renew date This change fixes GetSoonestRenewDate so that it returns the soonest renew date as calculated using "No Renewal Before" and "NoRenewalBeforePrecision". In the past, it would only return the soonest renew date if "$now" was lesser than it, which would typically only happen when using an "exact" precision rather than a "date" precision. Test plan: 0. Apply the patch 1. prove t/db_dependent/Circulation.t Signed-off-by: Sam Lau Signed-off-by: Katrin Fischer Signed-off-by: Tomas Cohen Arazi (cherry picked from commit f8c474019d74c9fd608206daf3074a79c5737f12) Signed-off-by: Fridolin Somers --- C4/Circulation.pm | 2 +- t/db_dependent/Circulation.t | 3 ++- 2 files changed, 3 insertions(+), 2 deletions(-) diff --git a/C4/Circulation.pm b/C4/Circulation.pm index f9450d86d5..70f24cb874 100644 --- a/C4/Circulation.pm +++ b/C4/Circulation.pm @@ -3437,7 +3437,7 @@ sub GetSoonestRenewDate { { $soonestrenewal->truncate( to => 'day' ); } - return $soonestrenewal if $now < $soonestrenewal; + return $soonestrenewal; } elsif ( $issue->auto_renew && $patron->autorenew_checkouts ) { # Checkouts with auto-renewing fall back to due date my $soonestrenewal = dt_from_string( $issue->date_due ); diff --git a/t/db_dependent/Circulation.t b/t/db_dependent/Circulation.t index 1602bb3c65..ae1457ba30 100755 --- a/t/db_dependent/Circulation.t +++ b/t/db_dependent/Circulation.t @@ -5768,12 +5768,13 @@ subtest "GetSoonestRenewDate tests" => sub { rule_value => 1, } ); - $issue->date_due( dt_from_string )->store; + $issue->date_due(dt_from_string)->store; is( GetSoonestRenewDate( $patron, $issue ), dt_from_string->subtract( days => 1 )->truncate( to => 'day' ), 'Checkouts with auto-renewal can be renewed 1 day before due date if no renewalbefore = 1 and precision = "date"' ); + }; subtest "CanBookBeIssued + needsconfirmation message" => sub { -- 2.39.2