Author: spadkins
Date: Thu Sep 13 10:56:03 2007
New Revision: 9942

Modified:
   p5ee/trunk/App-Context/lib/App/Context/POE/Server.pm

Log:
confirm that the prior fix was ok

Modified: p5ee/trunk/App-Context/lib/App/Context/POE/Server.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/Context/POE/Server.pm        (original)
+++ p5ee/trunk/App-Context/lib/App/Context/POE/Server.pm        Thu Sep 13 
10:56:03 2007
@@ -684,10 +684,6 @@
         #$self->log({level=>2}, "S: abort_running_async_event : 
async_event=[$async_event]\n");
         $self->{num_async_events}--;
         delete $self->{running_async_event}{$runtime_event_token};
-        ### TODO: This line was causing the mysterious Cancel and then re-run 
of 
-        ### events when passed a "C" Cancel request, discuss with SPA
-        ### ZWR doesn't think it is necessary
-        #unshift(@$pending_async_events, $async_event);
         $self->_abort_running_async_event($runtime_event_token, @$async_event);
     }
     &App::sub_exit($async_event) if ($App::trace);

Reply via email to