Scripts: refresh all indices

Previously when trying to refresh indices, scripts would call
$self->index->refresh. This would refresh the "currently used" index.
That doesn't make any sense when splitting each type into its own index.
This was also using ElasticSearchX::Model, which we want to get rid of.

Instead, call ->indices->refresh via the Search::Elasticsearch object.
This will refresh all indices, which is fine for our purposes. In the
future, we could consider being more selective about which indices we
are refreshing, but this is no worse than the old behavior.

Author: haarg

lib/MetaCPAN/Script/Author.pm

@@ -45,7 +45,7 @@ sub run {
   # ) unless $index =~ /author/;
 
     $self->index_authors;
-    $self->index->refresh;
+    $self->es->indices->refresh;
 }
 
 my @author_config_fields = qw(
@@ -167,7 +167,7 @@ sub index_authors {
     }
 
     $bulk->flush;
-    $self->index->refresh;
+    $self->es->indices->refresh;
 
     $self->perform_purges;
 

lib/MetaCPAN/Script/CPANTesters.pm

@@ -65,7 +65,7 @@ sub _build_db {
 sub run {
     my $self = shift;
     $self->index_reports;
-    $self->index->refresh;
+    $self->es->indices->refresh;
 }
 
 sub index_reports {

lib/MetaCPAN/Script/CPANTestersAPI.pm

@@ -45,7 +45,7 @@ has _bulk => (
 sub run {
     my $self = shift;
     $self->index_reports;
-    $self->index->refresh;
+    $self->es->indices->refresh;
 }
 
 sub index_reports {

lib/MetaCPAN/Script/Favorite.pm

@@ -70,7 +70,7 @@ sub run {
     }
 
     $self->index_favorites;
-    $self->index->refresh;
+    $self->es->indices->refresh;
 }
 
 sub index_favorites {

lib/MetaCPAN/Script/Latest.pm

@@ -63,7 +63,7 @@ sub run {
     }
 
     my $p = $self->packages;
-    $self->index->refresh;
+    $self->es->indices->refresh;
 
     # If a distribution name is passed get all the package names
     # from 02packages that match that distribution so we can limit
@@ -251,7 +251,7 @@ sub run {
         $self->reindex( $bulk, $file_data, 'cpan' );
     }
     $bulk->flush;
-    $self->index->refresh;
+    $self->es->indices->refresh;
 
     # Call Fastly to purge
     $self->purge_cpan_distnameinfos( [

lib/MetaCPAN/Script/Mirrors.pm

@@ -12,7 +12,7 @@ with 'MetaCPAN::Role::Script', 'MooseX::Getopt';
 sub run {
     my $self = shift;
     $self->index_mirrors;
-    $self->index->refresh;
+    $self->es->indices->refresh;
 }
 
 sub index_mirrors {

lib/MetaCPAN/Script/Package.pm

@@ -25,7 +25,7 @@ has clean_up => (
 sub run {
     my $self = shift;
     $self->index_packages;
-    $self->index->refresh;
+    $self->es->indices->refresh;
 }
 
 sub _get_02packages_fh {

lib/MetaCPAN/Script/Permission.pm

@@ -25,7 +25,7 @@ has clean_up => (
 sub run {
     my $self = shift;
     $self->index_permissions;
-    $self->index->refresh;
+    $self->es->indices->refresh;
 }
 
 sub index_permissions {

lib/MetaCPAN/Script/Purge.pm

@@ -135,7 +135,7 @@ sub run {
         }
     }
 
-    $self->index->refresh;
+    $self->es->indices->refresh;
 }
 
 sub purge_author_releases {

lib/MetaCPAN/Script/Release.pm

@@ -254,7 +254,7 @@ sub run {
             };
         }
     }
-    $self->index->refresh unless $self->queue;
+    $self->es->indices->refresh unless $self->queue;
 
     # Call Fastly to purge
     $self->purge_cpan_distnameinfos( \@module_to_purge_dists );