View | Details | Raw Unified | Return to bug 29145
Collapse All | Expand All

(-)a/Koha/Patron.pm (-2 / +9 lines)
Lines 1014-1019 sub has_overdues { Link Here
1014
    return $self->_result->issues->search({ date_due => { '<' => $dtf->format_datetime($date) } })->count;
1014
    return $self->_result->issues->search({ date_due => { '<' => $dtf->format_datetime($date) } })->count;
1015
}
1015
}
1016
1016
1017
1018
=head3 has_debarring_overdues
1019
1020
my $has_debarring_overdues = $patron->has_debarring_overdues({ issue_branchcode => $branchcode });
1021
1022
Returns true if patron has overdues that would result in debarment.
1023
1024
=cut
1025
1017
sub has_debarring_overdues {
1026
sub has_debarring_overdues {
1018
    my ($self, $params) = @_;
1027
    my ($self, $params) = @_;
1019
    $params //= {};
1028
    $params //= {};
Lines 1082-1088 sub _get_overdue_debarred_delay { Link Here
1082
        return $overdue_rules->{"delay2"} if($overdue_rules->{"debarred2"});
1091
        return $overdue_rules->{"delay2"} if($overdue_rules->{"debarred2"});
1083
        return $overdue_rules->{"delay3"} if($overdue_rules->{"debarred3"});
1092
        return $overdue_rules->{"delay3"} if($overdue_rules->{"debarred3"});
1084
    }
1093
    }
1085
    return undef;
1086
}
1094
}
1087
1095
1088
=head3 track_login
1096
=head3 track_login
1089
- 

Return to bug 29145