From 02042fffb6ab1a61bfc68b63f423f2f9dc28f151 Mon Sep 17 00:00:00 2001 From: Mike Rylander Date: Thu, 11 Feb 2016 09:15:23 -0500 Subject: [PATCH] Correct location test for at_circ and at_owning Signed-off-by: Mike Rylander --- Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Circulate.pm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) 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); } } -- 2.11.0