diff options
author | ivan <ivan> | 2011-06-11 00:51:35 +0000 |
---|---|---|
committer | ivan <ivan> | 2011-06-11 00:51:35 +0000 |
commit | d805c4baf46c86b40a98f1d3dbf92ce03f9b151b (patch) | |
tree | 5b6f1924b8f81262b7c06b51c85ea484d654ebc1 /FS/bin/freeside-torrus-srvderive | |
parent | b0ce0d814c0cba61dac7051821c8146d06d8a350 (diff) |
four kids, no delays, RT#10574
Diffstat (limited to 'FS/bin/freeside-torrus-srvderive')
-rw-r--r-- | FS/bin/freeside-torrus-srvderive | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/FS/bin/freeside-torrus-srvderive b/FS/bin/freeside-torrus-srvderive index 195e46e..cd893b4 100644 --- a/FS/bin/freeside-torrus-srvderive +++ b/FS/bin/freeside-torrus-srvderive @@ -12,7 +12,7 @@ use FS::Record qw( qsearch str2time_sql str2time_sql_closing concat_sql ); use FS::torrus_srvderive; our $DEBUG = 2; -our $max_kids = 16; +our $max_kids = 4; our $search_timeout = 2*60*60; #60*60; #30*60; # 15*60 5*60; #$torrus_srvderive->last_srv_date ? 5*60 : 15*60); our %kids; @@ -157,8 +157,6 @@ while (1) { or die $dsth->errstr; dbh->commit or die dbh->errstr; - sleep 20; - foreach my $dir ('_IN','_OUT') { #XX TORRUS_PATH @@ -176,8 +174,6 @@ while (1) { } warn "native srvderive done" if $DEBUG; - sleep 20; - $torrus_srvderive->last_srv_date($currdate); my $error = $torrus_srvderive->replace; die $error if $error; |