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=de07fae89e016c50bc41ce7e675963b73c6f9d0d;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 e3e7fa2f9b..75fcbd87ab 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Circulate.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Circulate.pm @@ -692,9 +692,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); } } @@ -705,9 +705,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); } }