From ffa4cd26f9902915276c41873d222eb3ff2e1060 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 a8ada775e0..e7e6129a1d 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