From 62a8c523d906ff0940d74f960a6c1403d476af72 Mon Sep 17 00:00:00 2001 From: Galen Charlton Date: Fri, 2 Sep 2016 15:56:45 -0400 Subject: [PATCH] ensure that suppressed system alerts do not set next_status Signed-off-by: Galen Charlton --- Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Circulate.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) 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 ce525e3f6a..e6705a8970 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Circulate.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Circulate.pm @@ -802,7 +802,8 @@ sub generate_system_copy_alerts { my %auto_override_conditions = (); foreach my $t (@final_types) { $t->next_status([$U->unique_unnested_numbers($t->next_status)]) - if ($t->next_status); + if ($t->next_status) && + !(grep {$t->id} @$suppressions); my $alert = new Fieldmapper::asset::copy_alert (); $alert->alert_type($t->id); -- 2.11.0