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

(-)a/misc/cronjobs/longoverdue.pl (-7 / +12 lines)
Lines 173-184 If not provided, the value of the system preference 'MarkLostItemsAsReturned' wi Link Here
173
Act on the listed borrower category code (borrowers.categorycode).
173
Act on the listed borrower category code (borrowers.categorycode).
174
Exclude all others. This may be specified multiple times to include multiple categories.
174
Exclude all others. This may be specified multiple times to include multiple categories.
175
May not be used with B<--skip-category>
175
May not be used with B<--skip-category>
176
If not provided, the value of the system preference 'DefaultLongOverdueBorrowerCategories' will be used.
176
177
177
=item B<--skip-category>
178
=item B<--skip-category>
178
179
179
Act on all available borrower category codes, except those listed.
180
Act on all available borrower category codes, except those listed.
180
This may be specified multiple times, to exclude multiple categories.
181
This may be specified multiple times, to exclude multiple categories.
181
May not be used with B<--category>
182
May not be used with B<--category>
183
If not provided, the value of the system preference 'DefaultLongOverdueSkipBorrowerCategories' will be used.
182
184
183
=item B<--list-categories>
185
=item B<--list-categories>
184
186
Lines 276-289 if ( ! defined($charge) ) { Link Here
276
    }
278
    }
277
}
279
}
278
280
279
if ( C4::Context->preference('DefaultLongOverdueBorrowerCategories') ) {
281
if ( scalar @$borrower_category == 0 ) {
280
    my $categories = C4::Context->preference('DefaultLongOverdueBorrowerCategories');
282
    if ( C4::Context->preference('DefaultLongOverdueBorrowerCategories') ) {
281
    $borrower_category = [ split( ',', $categories ) ];
283
        my $categories = C4::Context->preference('DefaultLongOverdueBorrowerCategories');
284
        $borrower_category = [ split( ',', $categories ) ];
285
    }
282
}
286
}
283
287
284
if ( C4::Context->preference('DefaultLongOverdueSkipBorrowerCategories') ) {
288
if ( scalar @$skip_borrower_category == 0 ) {
285
    my $categories = C4::Context->preference('DefaultLongOverdueSkipBorrowerCategories');
289
    if ( C4::Context->preference('DefaultLongOverdueSkipBorrowerCategories') ) {
286
    $skip_borrower_category = [ split( ',', $categories ) ];
290
        my $categories = C4::Context->preference('DefaultLongOverdueSkipBorrowerCategories');
291
        $skip_borrower_category = [ split( ',', $categories ) ];
292
    }
287
}
293
}
288
294
289
unless ($confirm) {
295
unless ($confirm) {
290
- 

Return to bug 35169