[open-ils-commits] r11301 - branches/rel_1_2/Open-ILS/src/perlmods/OpenILS/Application/Search

[svn at svn.open-ils.org]

Author: erickson
Date: 2008-11-21 15:46:50 -0500 (Fri, 21 Nov 2008)
New Revision: 11301

Modified:
   branches/rel_1_2/Open-ILS/src/perlmods/OpenILS/Application/Search/Biblio.pm
Log:
use storage instead of cstore for searching callnumbers by label to prevent c-json from treating labels that look like numbers asdoubles

Modified: branches/rel_1_2/Open-ILS/src/perlmods/OpenILS/Application/Search/Biblio.pm
===================================================================
--- branches/rel_1_2/Open-ILS/src/perlmods/OpenILS/Application/Search/Biblio.pm	2008-11-21 20:46:43 UTC (rev 11300)
+++ branches/rel_1_2/Open-ILS/src/perlmods/OpenILS/Application/Search/Biblio.pm	2008-11-21 20:46:50 UTC (rev 11301)
@@ -8,6 +8,7 @@
 use OpenILS::Utils::ModsParser;
 use OpenSRF::Utils::SettingsClient;
 use OpenILS::Utils::CStoreEditor q/:funcs/;
+use OpenILS::Utils::Editor;
 use OpenSRF::Utils::Cache;
 use Encode;
 
@@ -1651,7 +1652,7 @@
 sub copies_by_cn_label {
 	my( $self, $conn, $record, $label, $circ_lib ) = @_;
 	my $e = new_editor();
-	my $cns = $e->search_asset_call_number({record => $record, label => $label, deleted => 'f'}, {idlist=>1});
+	my $cns = OpenILS::Utils::Editor->new->search_asset_call_number({record => $record, label => $label, deleted => 'f'}, {idlist=>1});
 	return [] unless @$cns;
 
 	# show all non-deleted copies in the staff client ...