Attachment 140723 Details for Bug 31095 – Bug 31095: Remove GetDebarments from Circulation.pm

[patch] Bug 31095: Remove GetDebarments from Circulation.pm

Bug-31095-Remove-GetDebarments-from-Circulationpm.patch (text/plain), 2.97 KB, created by Nick Clemens (kidclamp) on 2022-09-16 16:09:24 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: Nick Clemens (kidclamp)

Created: 2022-09-16 16:09:24 UTC

Size: 2.97 KB

patch

obsolete

>From ec7b3b247d1675c08c600e801fbc9b7f88aa52a3 Mon Sep 17 00:00:00 2001
>From: Martin Renvoize <martin.renvoize@ptfs-europe.com>
>Date: Wed, 24 Aug 2022 16:47:54 +0100
>Subject: [PATCH] Bug 31095: Remove GetDebarments from Circulation.pm
>
>This patch removes GetDebarments from Circulation.pm replacing them with
>calls to $patron->restrictions and filtering using a chained search
>call.
>
>Test plan
>1. Confirm that t/db_dependant/Circulation.t continues to pass
>
>Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
>---
> C4/Circulation.pm | 13 ++++++++-----
> 1 file changed, 8 insertions(+), 5 deletions(-)
>
>diff --git a/C4/Circulation.pm b/C4/Circulation.pm
>index 58ceeae3d1..932949a26b 100644
>--- a/C4/Circulation.pm
>+++ b/C4/Circulation.pm
>@@ -48,7 +48,7 @@ use Koha::Checkouts;
> use Koha::Illrequests;
> use Koha::Items;
> use Koha::Patrons;
>-use Koha::Patron::Debarments qw( DelUniqueDebarment GetDebarments AddUniqueDebarment );
>+use Koha::Patron::Debarments qw( DelUniqueDebarment AddUniqueDebarment );
> use Koha::Database;
> use Koha::Libraries;
> use Koha::Account::Lines;
>@@ -2528,10 +2528,11 @@ sub MarkIssueReturned {
>         }
> 
>         # Remove any OVERDUES related debarment if the borrower has no overdues
>+        my $overdue_restrictions = $patron->restrictions->search({ type => 'OVERDUES' });
>         if ( C4::Context->preference('AutoRemoveOverduesRestrictions')
>           && $patron->debarred
>           && !$patron->has_overdues
>-          && @{ GetDebarments({ borrowernumber => $borrowernumber, type => 'OVERDUES' }) }
>+          && $overdue_restrictions->count
>         ) {
>             DelUniqueDebarment({ borrowernumber => $borrowernumber, type => 'OVERDUES' });
>         }
>@@ -2620,9 +2621,10 @@ sub _calculate_new_debar_dt {
> 
>         my ( $has_been_extended );
>         if ( C4::Context->preference('CumulativeRestrictionPeriods') and $borrower->{debarred} ) {
>-            my $debarment = @{ GetDebarments( { borrowernumber => $borrower->{borrowernumber}, type => 'SUSPENSION' } ) }[0];
>+            my $patron = Koha::Patrons->find($borrower->{borrowernumber});
>+            my $debarment = $patron->restrictions->search({type => 'SUSPENSION' },{rows => 1})->single;
>             if ( $debarment ) {
>-                $return_date = dt_from_string( $debarment->{expiration}, 'sql' );
>+                $return_date = dt_from_string( $debarment->expiration, 'sql' );
>                 $has_been_extended = 1;
>             }
>         }
>@@ -3159,10 +3161,11 @@ sub AddRenewal {
>         }
> 
>         # Remove any OVERDUES related debarment if the borrower has no overdues
>+        my $overdue_restrictions = $patron->restrictions->search({ type => 'OVERDUES' });
>         if ( $patron
>           && $patron->is_debarred
>           && ! $patron->has_overdues
>-          && @{ GetDebarments({ borrowernumber => $borrowernumber, type => 'OVERDUES' }) }
>+          && $overdue_restrictions->count
>         ) {
>             DelUniqueDebarment({ borrowernumber => $borrowernumber, type => 'OVERDUES' });
>         }
>-- 
>2.30.2

Actions: View | Diff | Splinter Review

Attachments on bug 31095: 139614 | 139719 | 139720 | 139721 | 139722 | 139723 | 139724 | 139725 | 139726 | 139727 | 139728 | 139742 | 139743 | 139744 | 139745 | 139746 | 139747 | 139748 | 139749 | 139750 | 139751 | 139752 | 139753 | 139754 | 139755 | 139756 | 139757 | 139758 | 140714 | 140715 | 140716 | 140717 | 140718 | 140719 | 140720 | 140721 | 140722 | 140723 | 140724 | 140725 | 140726 | 140727 | 140728 | 140729 | 140730 | 140731 | 142059 | 142060 | 142061 | 142062 | 142063 | 142064 | 142065 | 142066 | 142067 | 142068 | 142069 | 142070 | 142071 | 142072 | 142073 | 142074 | 142075 | 142076 | 143745 | 143746 | 143747 | 143748 | 143749 | 143750 | 143751 | 143752 | 143753 | 143754 | 143755 | 143756 | 143757 | 143758 | 143759 | 143760 | 143761 | 143762 | 143763 | 144903 | 144904 | 144905 | 144906 | 144907 | 144908 | 144909 | 144910 | 144911 | 144912 | 144913 | 144914 | 144915 | 144916 | 144917 | 144918 | 144919 | 144920 | 144921 | 145800 | 145801 | 145803 | 145845