From: erickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Thu, 3 Jun 2010 17:30:47 +0000 (+0000)
Subject: prevent warnings that occur when the event type is not defined
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=42e07cd882abc0ae1f8be0529badab6a7c48aab0;p=evergreen%2Fbjwebb.git

prevent warnings that occur when the event type is not defined

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

diff --git a/Open-ILS/src/perlmods/OpenILS/Event.pm b/Open-ILS/src/perlmods/OpenILS/Event.pm
index 59d6e03dc..5d5708eff 100644
--- a/Open-ILS/src/perlmods/OpenILS/Event.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Event.pm
@@ -23,7 +23,7 @@ sub new {
 	_load_events() unless $events;
 
 	throw OpenSRF::EX ("Bad event name: $event") unless $event;
-	my $e = $events->{$event};
+	my $e = $events->{$event} || '';
 
 	my( $m, $f, $l ) = caller(0);
 	my( $mm, $ff, $ll ) = caller(1);
@@ -44,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 };
 }