source: extensions/pLoader/trunk/src/Uploader/TransferManager.pm @ 6707

package Uploader::TransferManager;
use threads;
use threads::shared;
use Thread::Queue;
use strict;
use base qw/Uploader::ThreadManager/;
use Uploader::TransferWorker;
__PACKAGE__->mk_accessors(qw/
    pwg
    destination_category
/);
use Data::Dumper;

sub new_worker {
    my ( $self ) =@_;


    Uploader::TransferWorker->new({
        pwg           => $self->pwg,
        localized_msg => $self->localized_msg,
    });

}


sub destination_category_is_empty {
    my ( $self ) = @_;

    defined $self->destination_category ?
        !scalar @{$self->destination_category} :
        1;
}

1;