return all potential next copy statuses, not just first

Signed-off-by: Galen Charlton <gmc@esilibrary.com>

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 49c4175..aba5512 100644 (file)
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Circulate.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Circulate.pm
@@ -711,7 +711,7 @@ sub filter_user_copy_alerts {
                 }
             }
 
-            $a->alert_type->next_status($U->unique_unnested_numbers($a->alert_type->next_status));
+            $a->alert_type->next_status([$U->unique_unnested_numbers($a->alert_type->next_status)]);
 
             push @final_alerts, $a;
         }
@@ -792,7 +792,7 @@ sub generate_system_copy_alerts {
 
     my @alerts;
     foreach my $t (@final_types) {
-        $t->next_status($U->unique_unnested_numbers($t->next_status));
+        $t->next_status([$U->unique_unnested_numbers($t->next_status)]);
 
         my $alert = new Fieldmapper::asset::copy_alert ();
         $alert->alert_type($t->id);