From 0cdd5ec6cd34095394a4b6f243ea7ec015df4205 Mon Sep 17 00:00:00 2001
From: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
Date: Tue, 16 Mar 2021 09:55:10 +0100
Subject: [PATCH] Bug 27835: Revert "Bug 27180: (follow-up) Remove unused
 %is_holiday"

This reverts commit a26d529a2bc7faee3743b4cd1e603ba29411a0b9.

Revert "Bug 27180: Update fines on holidays"

This reverts commit 80e1b4e66f01a07cad9bf37625d879f649edf52a.

Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
(cherry picked from commit 1c4b4cbd91cc9888e9cdbdf1fe43a10c91bd157b)
Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com>
---
 misc/cronjobs/fines.pl | 18 ++++++++++++++++--
 1 file changed, 16 insertions(+), 2 deletions(-)

diff --git a/misc/cronjobs/fines.pl b/misc/cronjobs/fines.pl
index 717c0d5fa2..9f61c0f598 100755
--- a/misc/cronjobs/fines.pl
+++ b/misc/cronjobs/fines.pl
@@ -101,6 +101,7 @@ my $control      = C4::Context->preference('CircControl');
 my $mode         = C4::Context->preference('finesMode');
 my $delim = "\t";    # ?  C4::Context->preference('delimiter') || "\t";
 
+my %is_holiday;
 my $today = dt_from_string();
 my $filename;
 if ($log or $output_dir) {
@@ -130,7 +131,11 @@ for my $overdue ( @{$overdues} ) {
         ( $control eq 'ItemHomeLibrary' ) ? $overdue->{homebranch}
       : ( $control eq 'PatronLibrary' )   ? $patron->branchcode
       :                                     $overdue->{branchcode};
-    # In final case, CircControl must be PickupLibrary. (branchcode comes from issues table here).
+
+# In final case, CircControl must be PickupLibrary. (branchcode comes from issues table here).
+    if ( !exists $is_holiday{$branchcode} ) {
+        $is_holiday{$branchcode} = set_holiday( $branchcode, $today );
+    }
 
     my $datedue = dt_from_string( $overdue->{date_due} );
     if ( DateTime->compare( $datedue, $today ) == 1 ) {
@@ -142,7 +147,9 @@ for my $overdue ( @{$overdues} ) {
       CalcFine( $overdue, $patron->categorycode,
         $branchcode, $datedue, $today );
 
-    if ( $mode eq 'production' ) {
+    # Don't update the fine if today is a holiday.
+    # This ensures that dropbox mode will remove the correct amount of fine.
+    if ( $mode eq 'production' && !$is_holiday{$branchcode} ) {
         if ( $amount && $amount > 0 ) {
             UpdateFine(
                 {
@@ -186,6 +193,13 @@ Number of Overdue Items:
 EOM
 }
 
+sub set_holiday {
+    my ( $branch, $dt ) = @_;
+
+    my $calendar = Koha::Calendar->new( branchcode => $branch );
+    return $calendar->is_holiday($dt);
+}
+
 sub get_filename {
     my $directory = shift;
     if ( !$directory ) {
-- 
2.39.5