use base qw(Koha::SearchEngine::Elasticsearch);
use Modern::Perl;
-use Catmandu::Store::ElasticSearch;
-
-Koha::SearchEngine::Elasticsearch::Browse->mk_accessors(qw( store ));
-
=head2 browse
my $results = $browser->browse($prefix, $field, \%options);
sub browse {
my ($self, $prefix, $field, $options) = @_;
- my $params = $self->get_elasticsearch_params();
- $self->store(
- Catmandu::Store::ElasticSearch->new(
- %$params,
- )
- ) unless $self->store;
-
my $query = $self->_build_query($prefix, $field, $options);
- my $results = $self->store->bag->search(%$query);
+ my $elasticsearch = $self->get_elasticsearch();
+ my $conf = $self->get_elasticsearch_params();
+ my $results = $elasticsearch->search(
+ index => $conf->{index_name},
+ body => $query
+ );
+
return $results->{suggest}{suggestions}[0]{options};
}
recommends 'Array::Utils', '0.5';
recommends 'CGI::Session::Driver::memcached', '0.04';
recommends 'Cache::FastMmap', '1.34';
-recommends 'Catmandu::MARC', '1.241';
-recommends 'Catmandu::Store::ElasticSearch', '>= 0.0507, <= 0.512';
recommends 'DBD::SQLite2', '0.33';
recommends 'Devel::Cover', '0.89';
recommends 'File::Copy', '2.08';