From: berick <berick@esilibrary.com>
Date: Mon, 25 Apr 2011 13:56:58 +0000 (-0400)
Subject: added option to flesh import items on queued record retrieval
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=7cca21c8c126e98a64ec8677d2981d4a472ca26a;p=Evergreen.git

added option to flesh import items on queued record retrieval
---

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Vandelay.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Vandelay.pm
index 3516fd3702..59dc39bd3a 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Vandelay.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Vandelay.pm
@@ -457,10 +457,9 @@ sub retrieve_queued_records {
         'retrieve_vandelay_queued_bib_record' : 'retrieve_vandelay_queued_authority_record';
 
     for my $rec_id (@$record_ids) {
-        my $params = {   
-            flesh => 1,
-            flesh_fields => {$class => ['attributes', 'matches']},
-        };
+        my $flesh = ['attributes', 'matches'];
+        push(@$flesh, 'import_items') if $$options{flesh_import_items};
+        my $params = {flesh => 1, flesh_fields => {$class => $flesh}};
         my $rec = $e->$retrieve([$rec_id->{id}, $params]);
         $rec->clear_marc if $$options{clear_marc};
         $conn->respond($rec);