Changeset 11102

Show
Ignore:
Timestamp:
03/13/10 06:40:36 (5 months ago)
Author:
adamk
Message:

Removing an import

Files:
1 modified

Legend:

Unmodified
Added
Removed

  • trunk/Padre/lib/Padre/TaskManager.pm

    r11070 r11102  
    6565use strict; 
    6666use warnings; 
     67use Params::Util (); 
    6768 
    6869our $VERSION = '0.58'; 
    69  
    70 use Params::Util qw{_INSTANCE}; 
    7170 
    7271# According to Wx docs, 
    … …  
    120119        my $self = $SINGLETON = bless { 
    121120                min_no_workers => 2,    # there were config settings for 
    122                 max_no_workers => 6,    #  these long ago? 
     121                max_no_workers => 6,    # these long ago? 
    123122                use_threads    => 1,    # can be explicitly disabled 
    124123                reap_interval  => 15000, 
    … …  
    212211sub schedule { 
    213212        my $self = shift; 
    214         my $task = _INSTANCE( shift, 'Padre::Task' ) 
     213        my $task = Params::Util::_INSTANCE( shift, 'Padre::Task' ) 
    215214                or die "Invalid task scheduled!"; # TO DO: grace 
    216215 
    217         if ( _INSTANCE( $task, 'Padre::Service' ) ) { 
     216        if ( Params::Util::_INSTANCE( $task, 'Padre::Service' ) ) { 
    218217                $self->{running_services}{$task} = $task; 
    219218        }