tickets - fix script

Author: mickeyn

bin/tickets.pl

@@ -30,7 +30,7 @@
 my $gh_graphql = Net::GitHub::V4->new(
     ( $gh_token ? ( access_token => $gh_token ) : () ) );
 
-my $es   = MetaCPAN::ES->new( index => "cpan", type => "distribution" );
+my $es   = MetaCPAN::ES->new( index => "distribution" );
 my $bulk = $es->bulk();
 
 check_all_distributions();
@@ -43,7 +43,7 @@
 
 # make sure all distributions have an entry
 sub check_all_distributions () {
-    my $es_release     = MetaCPAN::ES->new( type => "release" );
+    my $es_release     = MetaCPAN::ES->new( index => "release" );
     my $scroll_release = $es_release->scroll(
         body => {
             query => {
@@ -123,7 +123,7 @@ ($d)
 sub index_github_bugs () {
     log_debug {'Fetching GitHub issues'};
 
-    my $es_release     = MetaCPAN::ES->new( type => "release" );
+    my $es_release     = MetaCPAN::ES->new( index => "release" );
     my $scroll_release = $es_release->scroll(
         body => {
             query => {