Changeset 10575 for trunk/Padre/lib/Padre/Task.pm

Timestamp:

02/07/10 03:31:29 (2 years ago)

Author:

tsee

Message:

submersible_toaster: I think this might resolve the issue with catching events from main

File:

• trunk/Padre/lib/Padre/Task.pm (modified) (4 diffs)

trunk/Padre/lib/Padre/Task.pm

@@ -169 +169 @@
         if (not $event_hooks_initialized) {
             $event_hooks_initialized = 1;
-            my $main = Padre->ide->wx->main;
+            my $main = Padre->ide->wx;
             Wx::Event::EVT_COMMAND(
                 $main,
@@ -425 +425 @@
 # The main-thread stdout hook
 sub _on_stdout {
-    my ( $main, $event ) = @_;
+    my ( $wx, $event ) = @_;
     @_ = (); # hack to avoid "Scalars leaked"
+    my $main = $wx->main;
     my $out = $main->output();
     $main->show_output(1);
@@ -436 +437 @@
 # The main-thread stderr hook
 sub _on_stderr {
-    my ( $main, $event ) = @_;
+    my ( $wx, $event ) = @_;
     @_ = (); # hack to avoid "Scalars leaked"
+    my $main = $wx->main;
     my $out = $main->output();
     $main->show_output(1);
@@ -532 +534 @@
 
     Wx::PostEvent(
-        $Padre::TaskManager::_main,
+        Padre->ide->wx,
         Wx::PlThreadEvent->new( -1, $eventid, $data ),
     );