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

Timestamp:

02/07/10 10:12:19 (2 years ago)

Author:

azawawi

Message:

Perl tidy

File:

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

trunk/Padre/lib/Padre/Task.pm

@@ -153 +153 @@
     return $self;
 }
+
 =head2 schedule
 
@@ -165 +166 @@
 SCOPE: {
     my $event_hooks_initialized = 0;
+
     sub schedule {
         my $self = shift;
-        if (not $event_hooks_initialized) {
+        if ( not $event_hooks_initialized ) {
             $event_hooks_initialized = 1;
             my $main = Padre->ide->wx;
@@ -428 +430 @@
     @_ = (); # hack to avoid "Scalars leaked"
     my $main = $wx->main;
-    my $out = $main->output();
+    my $out  = $main->output();
     $main->show_output(1);
     $out->style_neutral();
@@ -440 +442 @@
     @_ = (); # hack to avoid "Scalars leaked"
     my $main = $wx->main;
-    my $out = $main->output();
+    my $out  = $main->output();
     $main->show_output(1);
     $out->style_bad();