[open-ils-commits] r8518 - branches/rel_1_2/Open-ILS/src/perlmods/OpenILS/Application

[svn at svn.open-ils.org]

Author: erickson
Date: 2008-01-28 15:56:07 -0500 (Mon, 28 Jan 2008)
New Revision: 8518

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

Modified: branches/rel_1_2/Open-ILS/src/perlmods/OpenILS/Application/Collections.pm
===================================================================
--- branches/rel_1_2/Open-ILS/src/perlmods/OpenILS/Application/Collections.pm	2008-01-28 20:54:13 UTC (rev 8517)
+++ branches/rel_1_2/Open-ILS/src/perlmods/OpenILS/Application/Collections.pm	2008-01-28 20:56:07 UTC (rev 8518)
@@ -129,7 +129,7 @@
     my($self, $conn, $e, $req, $starttime, @params) = @_;
 
    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;
@@ -304,7 +304,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;