updating badly explained (by me) alternative (untested)
authormiker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Sun, 26 Apr 2009 01:49:21 +0000 (01:49 +0000)
committermiker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Sun, 26 Apr 2009 01:49:21 +0000 (01:49 +0000)
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

index 008f7ff..ee827c0 100644 (file)
@@ -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' },