return the underlying atev, which was the original intention

git-svn-id: svn://svn.open-ils.org/ILS/trunk@12375 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 b2f3d0c..baf8e80 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Trigger/EventGroup.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Trigger/EventGroup.pm
@@ -128,7 +128,7 @@ sub event {
     my $self = shift;
     return undef unless (ref $self);
 
-    return $self->{events}[0];
+    return $self->{events}[0]->event;
 }
 
 sub events {