From: Mike Rylander Date: Thu, 11 Feb 2016 14:15:23 +0000 (-0500) Subject: Correct location test for at_circ and at_owning X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=02042fffb6ab1a61bfc68b63f423f2f9dc28f151;p=working%2FEvergreen.git Correct location test for at_circ and at_owning Signed-off-by: Mike Rylander --- diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Circulate.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Circulate.pm index da564eb928..2cd252a460 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Circulate.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Circulate.pm @@ -682,9 +682,9 @@ sub filter_user_copy_alerts { my $orgs = $U->get_org_descendants($copy_circ_lib); if ($U->is_true($a->alert_type->invert_location)) { - next if (grep {$_ == $copy_circ_lib} @$orgs); + next if (grep {$_ == $self->circ_lib} @$orgs); } else { - next unless (grep {$_ == $copy_circ_lib} @$orgs); + next unless (grep {$_ == $self->circ_lib} @$orgs); } } @@ -695,9 +695,9 @@ sub filter_user_copy_alerts { my $orgs = $U->get_org_descendants($copy_owning_lib); if ($U->is_true($a->alert_type->invert_location)) { - next if (grep {$_ == $copy_owning_lib} @$orgs); + next if (grep {$_ == $self->circ_lib} @$orgs); } else { - next unless (grep {$_ == $copy_owning_lib} @$orgs); + next unless (grep {$_ == $self->circ_lib} @$orgs); } }