summaryrefslogtreecommitdiff
path: root/FS/bin/freeside-torrus-srvderive
diff options
context:
space:
mode:
authorivan <ivan>2011-06-11 00:51:35 +0000
committerivan <ivan>2011-06-11 00:51:35 +0000
commitd805c4baf46c86b40a98f1d3dbf92ce03f9b151b (patch)
tree5b6f1924b8f81262b7c06b51c85ea484d654ebc1 /FS/bin/freeside-torrus-srvderive
parentb0ce0d814c0cba61dac7051821c8146d06d8a350 (diff)
four kids, no delays, RT#10574
Diffstat (limited to 'FS/bin/freeside-torrus-srvderive')
-rw-r--r--FS/bin/freeside-torrus-srvderive6
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;