Fine generator; raise multi-session mode recv timeout

When fetching the batch of overdue circ IDs to process for fine
generation, wait a little longer for the data to arrive, since
it is a longer running DB query than most.

Signed-off-by: Bill Erickson <berick@esilibrary.com>
Signed-off-by: Lebbeous Fogle-Weekley <lebbeous@esilibrary.com>

diff --git a/Open-ILS/src/support-scripts/fine_generator.pl b/Open-ILS/src/support-scripts/fine_generator.pl
index 3ab838a..5d0ac8e 100755 (executable)
--- a/Open-ILS/src/support-scripts/fine_generator.pl
+++ b/Open-ILS/src/support-scripts/fine_generator.pl
@@ -60,7 +60,7 @@ if ($parallel == 1) {
 
     my $storage = OpenSRF::AppSession->create("open-ils.storage");
     my $r = $storage->request('open-ils.storage.action.circulation.overdue.id_list');
-    while (my $resp = $r->recv) {
+    while (my $resp = $r->recv(timeout => 600)) {
         my $circ_id = $resp->content;
         $multi_generator->request( 'open-ils.storage.action.circulation.overdue.generate_fines', $circ_id );
     }