From d27ee3911874169898d310cdec5cf83409ef08c2 Mon Sep 17 00:00:00 2001 From: miker Date: Sun, 26 Apr 2009 01:49:21 +0000 Subject: [PATCH] updating badly explained (by me) alternative (untested) git-svn-id: svn://svn.open-ils.org/ILS/trunk@12988 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- Open-ILS/src/perlmods/OpenILS/Application/Search/Serial.pm | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Search/Serial.pm b/Open-ILS/src/perlmods/OpenILS/Application/Search/Serial.pm index 008f7ff712..ee827c0412 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Search/Serial.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Search/Serial.pm @@ -78,9 +78,11 @@ sub bib_to_mfhd_hash { my $mfhd_hash; - # miker suggested this way, but I'm too stupid to get it to work + # XXX perhaps this? --miker # my $e = OpenILS::Utils::CStoreEditor->new(); -# my $mfhd = $e->search_serial_record_entry({bib=>$bib}); +# my $mfhd = $e->search_serial_record_entry({ record => $bib }); +# return $u->generate_svr( $mfhd->[0]->marc ) if (ref $mfhd); +# return undef; my @mfhd = $U->cstorereq( "open-ils.cstore.json_query.atomic", { select => { sre => 'marc' }, -- 2.43.2