From 721705bfafd5b528addc76d39674dadb4e80bffa Mon Sep 17 00:00:00 2001
From: Brian West <brian@freeswitch.org>
Date: Sat, 6 Mar 2010 00:20:29 +0000
Subject: [PATCH]  delete the event hash cuz you know we don't need it anymore
 till the next event.

git-svn-id: http://svn.freeswitch.org/svn/freeswitch/trunk@16924 d0543943-73ff-0310-b7d9-9358b9ac24b2
---
 libs/esl/perl/ESL/Dispatch.pm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/libs/esl/perl/ESL/Dispatch.pm b/libs/esl/perl/ESL/Dispatch.pm
index 87a17f09f6..c836457708 100644
--- a/libs/esl/perl/ESL/Dispatch.pm
+++ b/libs/esl/perl/ESL/Dispatch.pm
@@ -88,6 +88,7 @@ sub run($;) {
 	$event = $self->{_esl}->recvEvent();
       }
       $self->render_event($event,1);
+      delete $self->{event_hash};
     }
     sleep 1;
     $self->{_esl} = new ESL::ESLconnection("$self->{host}", "$self->{port}", "$self->{pass}");