Koha-community/Koha
13
7
Fork 0
Code Issues Releases Wiki Activity

Bug 9596: (QA follow-up) Add some clarifying comments

Browse source 
Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
Signed-off-by: Katrin Fischer <katrin.fischer@bsz-bw.de>
This commit is contained in:
Kyle Hall 2024-07-23 06:07:02 -04:00 committed by Katrin Fischer
parent 8e4963d97c
commit bbd722be5b
Signed by: kfischer
GPG key ID: 0EF6E2C03357A834
1 changed files with 4 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
misc/cronjobs/longoverdue.pl
View file

@ -387,6 +387,7 @@ my $filter_borrower_categories = ( scalar @$borrower_category || scalar @$skip_b
my @available_branches = Koha::Libraries->search()->get_column('branchcode');
my %branches_to_process;
# If --branch was used, validate any branchcode passed in and mark them as branches to use
for my $lib (@branches) {
unless ( grep { $_ eq $lib } @available_branches ) {
pod2usage(
@ -396,6 +397,7 @@ for my $lib (@branches) {
}
$branches_to_process{$lib} = 1;
}
# If --skip-branch was used, validate any branchcode passed in and mark them as branches to *not* use
if (@skip_branches) {
for my $lib (@skip_branches) {
unless ( grep { $_ eq $lib } @available_branches ) {
@ -406,6 +408,8 @@ if (@skip_branches) {
}
}
%branches_to_process = map { $_ => 1 } @available_branches;
# The mapped 0 values here will overwrite the corrosponding mapped 1 values
# where the 0 values exist
%branches_to_process = ( %branches_to_process, map { $_ => 0 } @skip_branches );
}