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

(-)a/Koha/Patron.pm (-2 / +9 lines)
Lines 985-990 sub has_overdues { Link Here
985
    return $self->_result->issues->search({ date_due => { '<' => $dtf->format_datetime($date) } })->count;
985
    return $self->_result->issues->search({ date_due => { '<' => $dtf->format_datetime($date) } })->count;
986
}
986
}
987
987
988
989
=head3 has_debarring_overdues
990
991
my $has_debarring_overdues = $patron->has_debarring_overdues({ issue_branchcode => $branchcode });
992
993
Returns true if patron has overdues that would result in debarment.
994
995
=cut
996
988
sub has_debarring_overdues {
997
sub has_debarring_overdues {
989
    my ($self, $params) = @_;
998
    my ($self, $params) = @_;
990
    $params //= {};
999
    $params //= {};
Lines 1053-1059 sub _get_overdue_debarred_delay { Link Here
1053
        return $overdue_rules->{"delay2"} if($overdue_rules->{"debarred2"});
1062
        return $overdue_rules->{"delay2"} if($overdue_rules->{"debarred2"});
1054
        return $overdue_rules->{"delay3"} if($overdue_rules->{"debarred3"});
1063
        return $overdue_rules->{"delay3"} if($overdue_rules->{"debarred3"});
1055
    }
1064
    }
1056
    return undef;
1057
}
1065
}
1058
1066
1059
=head3 track_login
1067
=head3 track_login
1060
- 

Return to bug 29145