[open-ils-commits] r8517 - branches/rel_1_2_1/Open-ILS/src/perlmods/OpenILS/Application

[svn at svn.open-ils.org]

Author: erickson
Date: 2008-01-28 15:54:13 -0500 (Mon, 28 Jan 2008)
New Revision: 8517

Modified:
   branches/rel_1_2_1/Open-ILS/src/perlmods/OpenILS/Application/Collections.pm
Log:
drastically up the timeout for these long-running transactions

Modified: branches/rel_1_2_1/Open-ILS/src/perlmods/OpenILS/Application/Collections.pm
===================================================================
--- branches/rel_1_2_1/Open-ILS/src/perlmods/OpenILS/Application/Collections.pm	2008-01-28 20:16:10 UTC (rev 8516)
+++ branches/rel_1_2_1/Open-ILS/src/perlmods/OpenILS/Application/Collections.pm	2008-01-28 20:54:13 UTC (rev 8517)
@@ -121,7 +121,7 @@
    $conn->status( new OpenSRF::DomainObject::oilsContinueStatus );
 
    my $total;
-   while( my $resp = $req->recv(timeout => 600) ) {
+   while( my $resp = $req->recv(timeout => 7200) ) {
         return $req->failed if $req->failed;
         my $hash = $resp->content;
         next unless $hash;
@@ -222,7 +222,7 @@
     $conn->status( new OpenSRF::DomainObject::oilsContinueStatus );
 
     my $total;
-    while( my $resp = $req->recv(timeout => 600) ) {
+    while( my $resp = $req->recv(timeout => 7200) ) {
 
         unless($total) {
             $total = time - $start;