From: erickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Fri, 6 Mar 2009 20:43:56 +0000 (+0000)
Subject: update ids to match the remaining valid events
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=b680a6586d2c4cf061a9bb550b181c81dcd8dd01;p=evergreen%2Ftadl.git

update ids to match the remaining valid events

git-svn-id: svn://svn.open-ils.org/ILS/trunk@12451 dcc99617-32d9-48b4-a31d-7c20da2025e4
---

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() );