From 8706752d3166212a7b510afdb17955badf277175 Mon Sep 17 00:00:00 2001
From: erickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Mon, 26 Jan 2009 20:43:41 +0000
Subject: [PATCH] added a streaming, batch mvr retrieval method

git-svn-id: svn://svn.open-ils.org/ILS/branches/rel_1_4@11983 dcc99617-32d9-48b4-a31d-7c20da2025e4
---
 Open-ILS/src/perlmods/OpenILS/Application/Search/Biblio.pm | 13 +++++++++++++
 1 file changed, 13 insertions(+)

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Search/Biblio.pm b/Open-ILS/src/perlmods/OpenILS/Application/Search/Biblio.pm
index 3ff86cf8c2..e59c6e34e6 100644
--- a/Open-ILS/src/perlmods/OpenILS/Application/Search/Biblio.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Search/Biblio.pm
@@ -133,6 +133,19 @@ sub record_id_to_mods_slim {
 }
 
 
+
+__PACKAGE__->register_method(
+	method	=> "record_id_to_mods_slim_batch",
+	api_name	=> "open-ils.search.biblio.record.mods_slim.batch.retrieve",
+    stream => 1
+);
+sub record_id_to_mods_slim_batch {
+	my($self, $conn, $id_list) = @_;
+    $conn->respond(_records_to_mods($_)->[0]) for @$id_list;
+    return undef;
+}
+
+
 # Returns the number of copies attached to a record based on org location
 __PACKAGE__->register_method(
 	method	=> "record_id_to_copy_count",
-- 
2.11.0