From: Brian West Date: Sat, 6 Mar 2010 00:20:29 +0000 (+0000) Subject: delete the event hash cuz you know we don't need it anymore till the next event. X-Git-Tag: v1.0.6~224 X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=721705bfafd5b528addc76d39674dadb4e80bffa;p=thirdparty%2Ffreeswitch.git 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 --- 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}");