Changeset 11102 for trunk/Padre/lib/Padre/TaskManager.pm

Timestamp:

03/13/10 06:40:36 (2 years ago)

Author:

adamk

Message:

Removing an import

File:

• trunk/Padre/lib/Padre/TaskManager.pm (modified) (3 diffs)

trunk/Padre/lib/Padre/TaskManager.pm

@@ -65 +65 @@
 use strict;
 use warnings;
+use Params::Util ();
 
 our $VERSION = '0.58';
-
-use Params::Util qw{_INSTANCE};
 
 # According to Wx docs,
@@ -120 +119 @@
     my $self = $SINGLETON = bless {
         min_no_workers => 2,    # there were config settings for
-        max_no_workers => 6,    #  these long ago?
+        max_no_workers => 6,    # these long ago?
         use_threads    => 1,    # can be explicitly disabled
         reap_interval  => 15000,
@@ -212 +211 @@
 sub schedule {
     my $self = shift;
-    my $task = _INSTANCE( shift, 'Padre::Task' )
+    my $task = Params::Util::_INSTANCE( shift, 'Padre::Task' )
         or die "Invalid task scheduled!"; # TO DO: grace
 
-    if ( _INSTANCE( $task, 'Padre::Service' ) ) {
+    if ( Params::Util::_INSTANCE( $task, 'Padre::Service' ) ) {
         $self->{running_services}{$task} = $task;
     }