Elasticsearch --> Search::Elasticsearch

metacpan · Apr 3, 2014 · efa9e93 · efa9e93
1 parent 27cf92e
commit efa9e93
Show file tree

Hide file tree

Showing 4 changed files with 12 additions and 12 deletions.
diff --git a/lib/MetaCPAN/Client/Request.pm b/lib/MetaCPAN/Client/Request.pm
@@ -6,8 +6,8 @@ package MetaCPAN::Client::Request;
 use Moo;
 use Carp;
 use JSON;
-use Elasticsearch;
-use Elasticsearch::Scroll;
+use Search::Elasticsearch;
+use Search::Elasticsearch::Scroll;
 use Try::Tiny;
 use HTTP::Tiny;
 
@@ -68,13 +68,13 @@ sub ssearch {
     my $args   = shift;
     my $params = shift;
 
-    my $es = Elasticsearch->new(
+    my $es = Search::Elasticsearch->new(
         nodes            => $self->domain,
         cxn_pool         => 'Static::NoPing',
         send_get_body_as => 'POST',
     );
 
-    my $scroller = Elasticsearch::Scroll->new(
+    my $scroller = Search::Elasticsearch::Scroll->new(
         es          => $es,
         search_type => 'scan',
         scroll      => '5m',
@@ -254,6 +254,6 @@ Fetches a path from MetaCPAN (post or get), and returns the decoded result.
 
 =head2 ssearch
 
-Calls an Elastic Search query (using L<Elasticsearch> and returns an
-L<Elasticsearch::Scroll> scroller object.
+Calls an Elastic Search query (using L<Search::Elasticsearch> and returns an
+L<Search::Elasticsearch::Scroll> scroller object.
 
diff --git a/lib/MetaCPAN/Client/ResultSet.pm b/lib/MetaCPAN/Client/ResultSet.pm
@@ -9,8 +9,8 @@ use Carp;
 has scroller => (
     is       => 'ro',
     isa      => sub {
-        ref $_[0] eq 'Elasticsearch::Scroll'
-            or croak 'scroller must be an Elasticsearch::Scroll object';
+        ref $_[0] eq 'Search::Elasticsearch::Scroll'
+            or croak 'scroller must be an Search::Elasticsearch::Scroll object';
     },
     handles  => ['total'],
     required => 1,
@@ -65,7 +65,7 @@ and facets.
 
 =head2 scroller
 
-An L<Elasticsearch::Scroll> object
+An L<Search::Elasticsearch::Scroll> object
 
 =head2 type
 

diff --git a/t/api/favorite.t b/t/api/favorite.t
@@ -15,6 +15,6 @@ foreach my $option ( { author => 'XSAWYERX' }, { dist => 'MetaCPAN-Client' } ) {
     isa_ok( $rs, 'MetaCPAN::Client::ResultSet' );
     can_ok( $rs, qw<type scroller> );
     is( $rs->type, 'favorite', 'Correct resultset type' );
-    isa_ok( $rs->scroller, 'Elasticsearch::Scroll' );
+    isa_ok( $rs->scroller, 'Search::Elasticsearch::Scroll' );
 }
 
diff --git a/t/resultset.t b/t/resultset.t
@@ -11,7 +11,7 @@ like(
     exception {
         MetaCPAN::Client::ResultSet->new(
             type     => 'failZZ',
-            scroller => bless {}, 'Elasticsearch::Scroll',
+            scroller => bless {}, 'Search::Elasticsearch::Scroll',
         )
     },
     qr/Invalid type/,
@@ -20,7 +20,7 @@ like(
 
 my $rs = MetaCPAN::Client::ResultSet->new(
     type     => 'author',
-    scroller => bless {}, 'Elasticsearch::Scroll',
+    scroller => bless {}, 'Search::Elasticsearch::Scroll',
 );
 
 isa_ok( $rs, 'MetaCPAN::Client::ResultSet' );