[Catalyst-commits] r6421 - trunk/Catalyst-Engine-Wx/lib/Catalyst/Engine/Wx

eriam at dev.catalyst.perl.org eriam at dev.catalyst.perl.org
Wed May 23 19:47:30 GMT 2007


Author: eriam
Date: 2007-05-23 19:47:28 +0100 (Wed, 23 May 2007)
New Revision: 6421

Modified:
   trunk/Catalyst-Engine-Wx/lib/Catalyst/Engine/Wx/Event.pm
Log:
Change POE session name to something more conventional.

Modified: trunk/Catalyst-Engine-Wx/lib/Catalyst/Engine/Wx/Event.pm
===================================================================
--- trunk/Catalyst-Engine-Wx/lib/Catalyst/Engine/Wx/Event.pm	2007-05-23 17:41:49 UTC (rev 6420)
+++ trunk/Catalyst-Engine-Wx/lib/Catalyst/Engine/Wx/Event.pm	2007-05-23 18:47:28 UTC (rev 6421)
@@ -12,7 +12,7 @@
 # !package: Wx::Event
   
 sub EVT_QUIT { 
-   POE::Kernel->post('_WAXALYST', '_stop');
+   POE::Kernel->post('catalyst-wxperl', '_stop');
 }
 
 sub EVT { 
@@ -23,7 +23,7 @@
    $params->{'controller'} = $controller;
    $params->{'parent'}     = $parent;
 
-   POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', $params);
+   POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', $params);
 }
 
 #
@@ -41,7 +41,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_ACTIVATE, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -60,7 +60,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_ACTIVATE_APP, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -85,7 +85,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_BUTTON_CLICKED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -106,7 +106,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_CHECKBOX_CLICKED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -127,7 +127,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_CHOICE_SELECTED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -148,7 +148,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_LISTBOX_SELECTED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -169,7 +169,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_LISTBOX_DOUBLECLICKED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -190,7 +190,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TEXT_UPDATED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -212,7 +212,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TEXT_ENTER, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -233,7 +233,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TEXT_MAXLEN, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -254,7 +254,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TEXT_URL, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -275,7 +275,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_MENU_SELECTED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -297,7 +297,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_MENU_SELECTED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -318,7 +318,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_SLIDER_UPDATED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -339,7 +339,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_RADIOBOX_SELECTED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -360,7 +360,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_RADIOBUTTON_SELECTED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -381,7 +381,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_SCROLLBAR_UPDATED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -402,7 +402,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_COMBOBOX_SELECTED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -423,7 +423,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TOOL_CLICKED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -445,7 +445,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TOOL_CLICKED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -466,7 +466,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TOOL_RCLICKED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -488,7 +488,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TOOL_RCLICKED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -509,7 +509,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TOOL_ENTER, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -530,7 +530,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_LEFT_CLICK, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -551,7 +551,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_LEFT_DCLICK, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -572,7 +572,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_RIGHT_CLICK, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -593,7 +593,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_SET_FOCUS, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -614,7 +614,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_KILL_FOCUS, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -635,7 +635,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_ENTER, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -656,7 +656,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TOGGLEBUTTON_CLICKED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -677,7 +677,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_CHECKLISTBOX_TOGGLED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -698,7 +698,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TEXT_CUT, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -719,7 +719,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TEXT_COPY, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -740,7 +740,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TEXT_PASTE, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -764,7 +764,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_CLOSE_WINDOW, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -783,7 +783,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_END_SESSION, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -802,7 +802,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_QUERY_END_SESSION, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -826,7 +826,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_DROP_FILES, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -849,7 +849,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_ERASE_BACKGROUND, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -873,7 +873,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_FIND, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -894,7 +894,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_FIND_NEXT, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -915,7 +915,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_FIND_REPLACE, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -936,7 +936,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_FIND_REPLACE_ALL, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -957,7 +957,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_FIND_CLOSE, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -981,7 +981,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_SET_FOCUS, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -1000,7 +1000,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_KILL_FOCUS, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -1024,7 +1024,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_CHAR, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -1043,7 +1043,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_CHAR_HOOK, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -1062,7 +1062,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_KEY_DOWN, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -1081,7 +1081,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_KEY_UP, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -1105,7 +1105,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_GRID_CELL_LEFT_CLICK, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -1124,7 +1124,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_GRID_CELL_RIGHT_CLICK, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -1143,7 +1143,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_GRID_CELL_LEFT_DCLICK, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -1162,7 +1162,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_GRID_CELL_RIGHT_DCLICK, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -1181,7 +1181,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_GRID_LABEL_LEFT_CLICK, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -1200,7 +1200,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_GRID_LABEL_RIGHT_CLICK, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -1219,7 +1219,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_GRID_LABEL_LEFT_DCLICK, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -1238,7 +1238,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_GRID_LABEL_RIGHT_DCLICK, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -1257,7 +1257,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_GRID_ROW_SIZE, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -1276,7 +1276,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_GRID_COL_SIZE, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -1295,7 +1295,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_GRID_RANGE_SELECT, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -1314,7 +1314,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_GRID_CELL_CHANGE, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -1333,7 +1333,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_GRID_SELECT_CELL, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -1352,7 +1352,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_GRID_EDITOR_SHOWN, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -1371,7 +1371,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_GRID_EDITOR_HIDDEN, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -1390,7 +1390,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_GRID_EDITOR_CREATED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -1415,7 +1415,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_LISTBOOK_PAGE_CHANGING, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -1437,7 +1437,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_LISTBOOK_PAGE_CHANGING, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -1463,7 +1463,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_ICONIZE, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -1487,7 +1487,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_IDLE, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -1511,7 +1511,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_INIT_DIALOG, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -1535,7 +1535,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_JOY_BUTTON_DOWN, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -1554,7 +1554,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_JOY_BUTTON_UP, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -1573,7 +1573,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_JOY_MOVE, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -1592,7 +1592,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_JOY_ZMOVE, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -1617,7 +1617,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_LISTBOOK_PAGE_CHANGING, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -1638,7 +1638,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_LISTBOOK_PAGE_CHANGED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -1664,7 +1664,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_CHOICEBOOK_PAGE_CHANGING, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -1685,7 +1685,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_CHOICEBOOK_PAGE_CHANGED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -1711,7 +1711,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TOOLBOOK_PAGE_CHANGING, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -1732,7 +1732,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TOOLBOOK_PAGE_CHANGED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -1757,7 +1757,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TREEBOOK_PAGE_CHANGING, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -1778,7 +1778,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TREEBOOK_PAGE_CHANGED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -1799,7 +1799,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TREEBOOK_NODE_COLLAPSED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -1820,7 +1820,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TREEBOOK_NODE_EXPANDED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -1845,7 +1845,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_LIST_BEGIN_DRAG, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -1866,7 +1866,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_LIST_BEGIN_RDRAG, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -1887,7 +1887,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_LIST_BEGIN_LABEL_EDIT, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -1908,7 +1908,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_LIST_CACHE_HINT, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -1929,7 +1929,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_LIST_END_LABEL_EDIT, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -1950,7 +1950,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_LIST_DELETE_ITEM, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -1971,7 +1971,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_LIST_DELETE_ALL_ITEMS, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -1992,7 +1992,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_LIST_GET_INFO, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -2013,7 +2013,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_LIST_SET_INFO, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -2034,7 +2034,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_LIST_ITEM_SELECTED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -2055,7 +2055,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_LIST_ITEM_DESELECTED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -2076,7 +2076,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_LIST_KEY_DOWN, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -2097,7 +2097,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_LIST_INSERT_ITEM, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -2118,7 +2118,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_LIST_COL_CLICK, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -2139,7 +2139,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_LIST_RIGHT_CLICK, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -2160,7 +2160,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_LIST_MIDDLE_CLICK, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -2181,7 +2181,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_LIST_ITEM_ACTIVATED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -2202,7 +2202,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_LIST_COL_RIGHT_CLICK, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -2223,7 +2223,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_LIST_COL_BEGIN_DRAG, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -2244,7 +2244,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_LIST_COL_DRAGGING, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -2265,7 +2265,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_LIST_COL_END_DRAG, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -2286,7 +2286,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_LIST_ITEM_FOCUSED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -2307,7 +2307,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_LIST_ITEM_RIGHT_CLICK, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -2332,7 +2332,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_MENU_CHAR, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -2351,7 +2351,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_MENU_INIT, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -2371,7 +2371,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_MENU_HIGHLIGHT, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -2391,7 +2391,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_POPUP_MENU, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -2410,7 +2410,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_CONTEXT_MENU, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -2429,7 +2429,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_MENU_OPEN, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -2448,7 +2448,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_MENU_CLOSE, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -2471,7 +2471,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_LEFT_DOWN, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -2490,7 +2490,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_LEFT_UP, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -2509,7 +2509,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_LEFT_DCLICK, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -2528,7 +2528,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_MIDDLE_DOWN, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -2547,7 +2547,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_MIDDLE_UP, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -2566,7 +2566,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_MIDDLE_DCLICK, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -2585,7 +2585,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_RIGHT_DOWN, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -2604,7 +2604,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_RIGHT_UP, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -2623,7 +2623,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_RIGHT_DCLICK, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -2642,7 +2642,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_MOTION, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -2661,7 +2661,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_ENTER_WINDOW, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -2680,7 +2680,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_LEAVE_WINDOW, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -2699,7 +2699,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_MOUSEWHEEL, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -2739,7 +2739,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_MOVE, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -2758,7 +2758,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_MOVING, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -2783,7 +2783,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_NOTEBOOK_PAGE_CHANGING, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -2804,7 +2804,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_NOTEBOOK_PAGE_CHANGED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -2829,7 +2829,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_PAINT, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -2854,7 +2854,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_END_PROCESS, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -2879,7 +2879,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_SASH_DRAGGED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -2905,7 +2905,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_SCROLL_TOP, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -2924,7 +2924,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_SCROLL_TOP, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -2948,7 +2948,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_SCROLL_TOP, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -2967,7 +2967,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_SCROLL_TOP, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -2986,7 +2986,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_SCROLL_TOP, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -3005,7 +3005,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_SCROLL_TOP, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -3024,7 +3024,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_SCROLL_TOP, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -3043,7 +3043,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_SCROLL_TOP, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -3062,7 +3062,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_SCROLL_TOP, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -3081,7 +3081,7 @@
       $_[0]->Connect( -1, -1, &Wx::wxEVT_SCROLL_TOP, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -3102,7 +3102,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_SCROLL_TOP, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -3123,7 +3123,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_SCROLL_BOTTOM, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -3144,7 +3144,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_SCROLL_LINEUP, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -3165,7 +3165,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_SCROLL_LINEDOWN, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -3186,7 +3186,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_SCROLL_PAGEUP, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -3207,7 +3207,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_SCROLL_PAGEDOWN, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -3228,7 +3228,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_SCROLL_THUMBTRACK, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -3249,7 +3249,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_SCROLL_THUMBRELEASE, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -3273,7 +3273,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_SCROLL_LINEUP, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -3292,7 +3292,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_SCROLL_LINEUP, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -3311,7 +3311,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_SCROLL_LINEUP, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -3330,7 +3330,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_SCROLL_LINEUP, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -3349,7 +3349,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_SCROLL_LINEUP, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -3368,7 +3368,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_SCROLL_LINEUP, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -3387,7 +3387,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_SCROLL_LINEUP, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -3406,7 +3406,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_SCROLL_LINEUP, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -3431,7 +3431,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_SCROLL_LINEUP, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -3452,7 +3452,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_SCROLL_LINEDOWN, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -3473,7 +3473,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_SCROLL_THUMBTRACK, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -3494,7 +3494,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_SPINCTRL_UPDATED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -3519,7 +3519,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_SPLITTER_SASH_POS_CHANGING, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -3540,7 +3540,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_SPLITTER_SASH_POS_CHANGED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -3561,7 +3561,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_SPLITTER_UNSPLIT, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -3582,7 +3582,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_SPLITTER_DOUBLECLICKED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -3607,7 +3607,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TREE_BEGIN_DRAG, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -3631,7 +3631,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TREE_BEGIN_DRAG, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -3650,7 +3650,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TREE_BEGIN_DRAG, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -3669,7 +3669,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TREE_BEGIN_DRAG, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -3688,7 +3688,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TREE_BEGIN_DRAG, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -3707,7 +3707,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TREE_BEGIN_DRAG, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -3726,7 +3726,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TREE_BEGIN_DRAG, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -3745,7 +3745,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TREE_BEGIN_DRAG, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             event       => $event,
@@ -3770,7 +3770,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TREE_BEGIN_DRAG, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -3791,7 +3791,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TREE_BEGIN_RDRAG, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -3812,7 +3812,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TREE_END_DRAG, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -3833,7 +3833,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TREE_BEGIN_LABEL_EDIT, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -3854,7 +3854,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TREE_END_LABEL_EDIT, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -3875,7 +3875,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TREE_GET_INFO, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -3896,7 +3896,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TREE_SET_INFO, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -3917,7 +3917,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TREE_ITEM_EXPANDED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -3938,7 +3938,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TREE_ITEM_EXPANDING, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -3959,7 +3959,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TREE_ITEM_COLLAPSED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -3980,7 +3980,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TREE_ITEM_COLLAPSING, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -4001,7 +4001,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TREE_SEL_CHANGED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -4022,7 +4022,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TREE_SEL_CHANGING, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -4043,7 +4043,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TREE_KEY_DOWN, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -4064,7 +4064,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TREE_DELETE_ITEM, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -4085,7 +4085,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TREE_ITEM_ACTIVATED, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -4106,7 +4106,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TREE_ITEM_RIGHT_CLICK, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -4127,7 +4127,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TREE_ITEM_MIDDLE_CLICK, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -4148,7 +4148,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_COMMAND_TREE_ITEM_MENU, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -4173,7 +4173,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_UPDATE_UI, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -4194,7 +4194,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::EVT_UPDATE_UI_RANGE, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,
@@ -4219,7 +4219,7 @@
       $_[0]->Connect( $_[1], -1, &Wx::wxEVT_HYPERLINK, sub {
          my( $this, $event ) = @_;
    
-         POE::Kernel->post('_WAXALYST', 'EVENT_REQUEST', {
+         POE::Kernel->post('catalyst-wxperl', 'EVENT_REQUEST', {
             controller  => $controller,
             parent      => $parent,
             control     => $control,




More information about the Catalyst-commits mailing list