Use /rating/by_distributions API endpoint

Replace query sending with using new API endpoint.
metacpan · Jul 4, 2017 · d33002f · d33002f
1 parent b2f653c
commit d33002f
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 36 deletions.
diff --git a/lib/MetaCPAN/Web/Model/API/Rating.pm b/lib/MetaCPAN/Web/Model/API/Rating.pm
@@ -36,40 +36,8 @@ sub get {
         return Future->done( {} );
     }
 
-    return $self->request(
-        '/rating/_search',
-        {
-            size  => 0,
-            query => {
-                terms => { distribution => \@distributions }
-            },
-            aggregations => {
-                ratings => {
-                    terms => {
-                        field => 'distribution'
-                    },
-                    aggregations => {
-                        ratings_dist => {
-                            stats => {
-                                field => 'rating'
-                            }
-                        }
-                    }
-                }
-            }
-        }
-        )->transform(
-        done => sub {
-            my $data = shift;
-            return {
-                took    => $data->{took},
-                ratings => {
-                    map { $_->{key} => $_->{ratings_dist} }
-                        @{ $data->{aggregations}->{ratings}->{buckets} }
-                }
-            };
-        }
-        );
+    return $self->request( '/rating/by_distributions',
+        { distribution => \@distributions } );
 }
 
 __PACKAGE__->meta->make_immutable;

diff --git a/lib/MetaCPAN/Web/Role/ReleaseInfo.pm b/lib/MetaCPAN/Web/Role/ReleaseInfo.pm
@@ -66,8 +66,8 @@ sub stash_api_results {
     my %to_stash = (
         author       => $reqs->{author},
         distribution => $reqs->{distribution},
-        rating       => $reqs->{rating}->{ratings}->{ $data->{distribution} },
-        versions     => $reqs->{versions}{releases},
+        rating   => $reqs->{rating}{distributions}{ $data->{distribution} },
+        versions => $reqs->{versions}{releases},
     );
 
     my %stash