Stream records to ML for Vandelay queue export

Since queued records, with their marcxml blobs, are fairly large, avoid
fetching them atomically when possible.

Signed-off-by: Bill Erickson <berick@esilibrary.com>

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Vandelay.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Vandelay.pm
index 4a3d345..2b563a8 100644 (file)
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Vandelay.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Vandelay.pm
@@ -521,7 +521,7 @@ sub retrieve_queued_records {
         'search_vandelay_queued_bib_record' : 'search_vandelay_queued_authority_record';
 
     if ($self->api_name =~ /export/) {
-        my $rec_list = $e->$search({id => [map { $_->{id} } @$record_ids]});
+        my $rec_list = $e->$search({id => [map { $_->{id} } @$record_ids]}, {substream => 1});
         if ($self->api_name =~ /print/) {
 
             $e->rollback;