diff options
| author | fukachan <fukachan> | 2004-08-15 14:27:43 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2004-08-15 14:27:43 +0000 |
| commit | a00de29fba8d79c4e8e0f1f519a90e794d3acb8a (patch) | |
| tree | aceb668b88952eceb5ae5f42337db974a4dada97 /fml/lib/FML/Process/QueueManager.pm | |
| parent | 97798ccc01b0f094651044937c3e743278179bdc (diff) | |
| download | fml8-a00de29fba8d79c4e8e0f1f519a90e794d3acb8a.tar.gz fml8-a00de29fba8d79c4e8e0f1f519a90e794d3acb8a.tar.bz2 fml8-a00de29fba8d79c4e8e0f1f519a90e794d3acb8a.zip | |
bug fix condition that empty queue or not
Diffstat (limited to 'fml/lib/FML/Process/QueueManager.pm')
| -rw-r--r-- | fml/lib/FML/Process/QueueManager.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/fml/lib/FML/Process/QueueManager.pm b/fml/lib/FML/Process/QueueManager.pm index 0a532828..39cb96d5 100644 --- a/fml/lib/FML/Process/QueueManager.pm +++ b/fml/lib/FML/Process/QueueManager.pm @@ -4,7 +4,7 @@ # All rights reserved. This program is free software; you can # redistribute it and/or modify it under the same terms as Perl itself. # -# $FML: QueueManager.pm,v 1.25 2004/08/14 16:32:14 fukachan Exp $ +# $FML: QueueManager.pm,v 1.26 2004/08/15 11:59:04 fukachan Exp $ # package FML::Process::QueueManager; @@ -95,7 +95,7 @@ sub send else { $queue->set_policy("fair-queue"); $ra = $queue->list(); - if (@$ra) { + unless (@$ra) { $curproc->log("qmgr: empty active queue. re-schedule"); $queue->reschedule(); } |