From: erickson Date: Tue, 25 Nov 2008 14:40:21 +0000 (+0000) Subject: no longer force a pre-defined event name, since some events will be derived from... X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=c234a84da13758f314fc5cf0728e224f8363b885;p=Evergreen.git no longer force a pre-defined event name, since some events will be derived from user configured data in the DB git-svn-id: svn://svn.open-ils.org/ILS/trunk@11333 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- diff --git a/Open-ILS/src/perlmods/OpenILS/Event.pm b/Open-ILS/src/perlmods/OpenILS/Event.pm index fa77792389..b33cd80de6 100644 --- a/Open-ILS/src/perlmods/OpenILS/Event.pm +++ b/Open-ILS/src/perlmods/OpenILS/Event.pm @@ -20,16 +20,10 @@ my $descs = undef; sub new { my( $class, $event, %params ) = @_; - _load_events() unless $events; - if( $event ne 'SUCCESS' ) { - $logger->info("Returning non-success event object: $event "); - } - + throw OpenSRF::EX ("Bad event name: $event") unless $event; my $e = $events->{$event}; - throw OpenSRF::EX - ("No event defined with textcode: $event") unless defined $e; my( $m, $f, $l ) = caller(0); my( $mm, $ff, $ll ) = caller(1); @@ -50,7 +44,7 @@ sub new { ilsevent => $e, textcode => $event, stacktrace => "$f:$l $ff:$ll $fff:$lll", - desc => $descs->{$lang}->{$e}, + desc => $descs->{$lang}->{$e} || '', servertime => $t, pid => $$, %params }; }