[open-ils-commits] r12988 - trunk/Open-ILS/src/perlmods/OpenILS/Application/Search (miker)

[svn at svn.open-ils.org]

Author: miker
Date: 2009-04-25 21:49:21 -0400 (Sat, 25 Apr 2009)
New Revision: 12988

Modified:
   trunk/Open-ILS/src/perlmods/OpenILS/Application/Search/Serial.pm
Log:
updating badly explained (by me) alternative (untested)

Modified: trunk/Open-ILS/src/perlmods/OpenILS/Application/Search/Serial.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/Application/Search/Serial.pm	2009-04-26 01:31:26 UTC (rev 12987)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Application/Search/Serial.pm	2009-04-26 01:49:21 UTC (rev 12988)
@@ -78,9 +78,11 @@
 	
 	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' },