X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXMsg.pm;h=85c9e68eaf6498c169b48014147fd41ca27a9bb8;hb=436d07876d3f2253c00f146b461f3a4d3ee2a7a3;hp=11a30a4ed5458c582b3f6bb8432d03500583dc1b;hpb=6c38bca91e6b75002e15cce29c45a894f675e22e;p=spider.git diff --git a/perl/DXMsg.pm b/perl/DXMsg.pm index 11a30a4e..85c9e68e 100644 --- a/perl/DXMsg.pm +++ b/perl/DXMsg.pm @@ -136,7 +136,7 @@ sub process # this is periodic processing if (!$self || !$line) { - if ($main::systime > $lastq + $queueinterval) { + if ($main::systime >= $lastq + $queueinterval) { # wander down the work queue stopping any messages that have timed out for (keys %busy) {