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

(-)a/tools/cleanborrowers.pl (-2 / +7 lines)
Lines 38-43 use C4::Auth qw( get_template_and_user ); Link Here
38
use C4::Output qw( output_html_with_http_headers );
38
use C4::Output qw( output_html_with_http_headers );
39
use C4::Members qw( GetBorrowersToExpunge );
39
use C4::Members qw( GetBorrowersToExpunge );
40
use Koha::DateUtils qw( dt_from_string output_pref );
40
use Koha::DateUtils qw( dt_from_string output_pref );
41
use Koha::Old::Checkouts;
41
use Koha::Patron::Categories;
42
use Koha::Patron::Categories;
42
use Koha::Patrons;
43
use Koha::Patrons;
43
use Koha::List::Patron qw( GetPatronLists );
44
use Koha::List::Patron qw( GetPatronLists );
Lines 155-161 elsif ( $step == 3 ) { Link Here
155
    # Anonymising all members
156
    # Anonymising all members
156
    if ($do_anonym) {
157
    if ($do_anonym) {
157
        #FIXME: anonymisation errors are not handled
158
        #FIXME: anonymisation errors are not handled
158
        my $rows = Koha::Patrons->search_patrons_to_anonymise( { before => $last_issue_date } )->anonymise_issue_history( { before => $last_issue_date } );
159
        my $rows = Koha::Old::Checkouts
160
                     ->filter_by_anonymizable
161
                     ->filter_by_last_update({
162
                         to => $last_issue_date, timestamp_column_name => 'returndate' })
163
                     ->anonymize;
164
159
        $template->param(
165
        $template->param(
160
            do_anonym   => $rows,
166
            do_anonym   => $rows,
161
        );
167
        );
162
- 

Return to bug 29843