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

(-)a/Koha/Patron.pm (-2 / +9 lines)
Lines 951-956 sub has_overdues { Link Here
951
    return $self->_result->issues->search({ date_due => { '<' => $dtf->format_datetime($date) } })->count;
951
    return $self->_result->issues->search({ date_due => { '<' => $dtf->format_datetime($date) } })->count;
952
}
952
}
953
953
954
955
=head3 has_debarring_overdues
956
957
my $has_debarring_overdues = $patron->has_debarring_overdues({ issue_branchcode => $branchcode });
958
959
Returns true if patron has overdues that would result in debarment.
960
961
=cut
962
954
sub has_debarring_overdues {
963
sub has_debarring_overdues {
955
    my ($self, $params) = @_;
964
    my ($self, $params) = @_;
956
    $params //= {};
965
    $params //= {};
Lines 1019-1025 sub _get_overdue_debarred_delay { Link Here
1019
        return $overdue_rules->{"delay2"} if($overdue_rules->{"debarred2"});
1028
        return $overdue_rules->{"delay2"} if($overdue_rules->{"debarred2"});
1020
        return $overdue_rules->{"delay3"} if($overdue_rules->{"debarred3"});
1029
        return $overdue_rules->{"delay3"} if($overdue_rules->{"debarred3"});
1021
    }
1030
    }
1022
    return undef;
1023
}
1031
}
1024
1032
1025
=head3 track_login
1033
=head3 track_login
1026
- 

Return to bug 29145