@@ -, +, @@ _skip_borrowers_with_fines_or_issues --- tools/cleanborrowers.pl | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) --- a/tools/cleanborrowers.pl +++ a/tools/cleanborrowers.pl @@ -189,9 +189,10 @@ $template->param( #writing the template output_html_with_http_headers $cgi, $cookie, $template->output; -sub _skip_borrowers_with_nonzero_balance { +sub _skip_borrowers_with_nonzero_balance_or_issues { my $borrowers = shift; my $balance; + my $issues; @$borrowers = map { (undef, $issues, $balance) = GetMemberIssuesAndFines( $_->{borrowernumber} || $_->get_column('borrowernumber') ); ($balance != 0 || $issues!= 0) ? (): ($_); --