oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

oops, left in some debug

Browse source
This commit is contained in:
JT Smith 2006-07-20 00:56:59 +00:00
parent 35e0a63262
commit 6864750168
1 changed files with 0 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lib/Spectre/Workflow.pm
View file

@ -101,14 +101,11 @@ sub addInstance {
Checks to see if there are any open instance slots available, and if there are assigns a new instance to be run to fill it. Checks to see if there are any open instance slots available, and if there are assigns a new instance to be run to fill it.
=cut =cut
use POE::API::Peek;
sub checkInstances { sub checkInstances {
my ($kernel, $self) = @_[KERNEL, OBJECT]; my ($kernel, $self) = @_[KERNEL, OBJECT];
$self->debug("Checking to see if we can run anymore instances right now."); $self->debug("Checking to see if we can run anymore instances right now.");
if ($self->countRunningInstances < $self->config->get("maxWorkers")) { if ($self->countRunningInstances < $self->config->get("maxWorkers")) {
my $api = POE::API::Peek->new;
$self->debug("POE SESSIONS: ".$api->session_count);
$self->debug("Total workflows waiting to run: ".scalar(keys %{$self->{_instances}})); $self->debug("Total workflows waiting to run: ".scalar(keys %{$self->{_instances}}));
$self->debug("Priority 1 count: ".scalar(@{$self->{_priority1}})); $self->debug("Priority 1 count: ".scalar(@{$self->{_priority1}}));
$self->debug("Priority 2 count: ".scalar(@{$self->{_priority2}})); $self->debug("Priority 2 count: ".scalar(@{$self->{_priority2}}));