From b680a6586d2c4cf061a9bb550b181c81dcd8dd01 Mon Sep 17 00:00:00 2001 From: erickson Date: Fri, 6 Mar 2009 20:43:56 +0000 Subject: [PATCH] update ids to match the remaining valid events git-svn-id: svn://svn.open-ils.org/ILS/trunk@12451 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- Open-ILS/src/perlmods/OpenILS/Application/Trigger/EventGroup.pm | 1 + 1 file changed, 1 insertion(+) diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Trigger/EventGroup.pm b/Open-ILS/src/perlmods/OpenILS/Application/Trigger/EventGroup.pm index 45006e6346..99a09d0906 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Trigger/EventGroup.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Trigger/EventGroup.pm @@ -87,6 +87,7 @@ sub validate { } $self->valid(1) if (@valid_events); $self->{events} = \@valid_events; + $self->{ids} = [ map { $_->id } @valid_events ]; $self->editor->xact_commit; } otherwise { $log->error( shift() ); -- 2.11.0