From: erickson Date: Thu, 20 Dec 2007 00:05:42 +0000 (+0000) Subject: moving to cstore from storage, using editor for miker_s call X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=7a2c662871fc9762e358d4a7c2a3bcefbde44e4b;p=Evergreen.git moving to cstore from storage, using editor for miker_s call git-svn-id: svn://svn.open-ils.org/ILS/branches/acq-experiment@8242 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Search/Z3950.pm b/Open-ILS/src/perlmods/OpenILS/Application/Search/Z3950.pm index 064a0af2e1..734ffe1169 100755 --- a/Open-ILS/src/perlmods/OpenILS/Application/Search/Z3950.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Search/Z3950.pm @@ -15,7 +15,7 @@ use OpenILS::Utils::ModsParser; use OpenSRF::Utils::SettingsClient; use OpenILS::Application::AppUtils; use OpenSRF::Utils::Logger qw/$logger/; -use OpenILS::Utils::Editor q/:funcs/; +use OpenILS::Utils::CStoreEditor q/:funcs/; my $output = "USMARC"; @@ -85,13 +85,10 @@ sub query_services { return $e->event unless $e->checkauth; return $e->event unless $e->allowed('REMOTE_Z3950_QUERY'); - my $cstore = OpenSRF::AppSession->connect('open-ils.cstore'); - my $sources = $cstore->request( - 'open-ils.cstore.direct.config.z3950_source.search.atomic', - { id => { '!=' => null } }, - { flesh => 1, flesh_fields => { czs => ['attrs'] } } - )->gather(1); - $cstore->disconnect; + my $sources = $e->search_config_z3950_source( + [ { name => { '!=' => undef } }, + { flesh => 1, flesh_fields => { czs => ['attrs'] } }] + ); my %hash = (); for my $s ( @$sources ) {