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

(-)a/tools/cleanborrowers.pl (-4 / +4 lines)
Lines 159-170 $template->param( Link Here
159
#writing the template
159
#writing the template
160
output_html_with_http_headers $cgi, $cookie, $template->output;
160
output_html_with_http_headers $cgi, $cookie, $template->output;
161
161
162
sub _skip_borrowers_with_nonzero_balance {
162
sub _skip_borrowers_with_nonzero_balance_or_issues {
163
    my $borrowers = shift;
163
    my $borrowers = shift;
164
    my $balance;
164
    my $balance;
165
    my $issues;
165
    @$borrowers = map {
166
    @$borrowers = map {
166
        (undef, undef, $balance) = GetMemberIssuesAndFines( $_->{borrowernumber} );
167
        (undef, $issues, $balance) = GetMemberIssuesAndFines( $_->{borrowernumber} );
167
        ($balance != 0) ? (): ($_);
168
        ($balance != 0 || $issues!= 0) ? (): ($_);
168
    } @$borrowers;
169
    } @$borrowers;
169
}
170
}
170
171
171
- 

Return to bug 15642