From 13539ed1b0765d6d644db40b842f9158042b9ef9 Mon Sep 17 00:00:00 2001 From: Mickey Nasriachi Date: Sun, 25 Jun 2017 00:53:55 +0100 Subject: [PATCH] Use /favorite/agg_by_distributions API endpoint Replace query sending with using new API endpoint. --- lib/MetaCPAN/Web/Model/API/Favorite.pm | 50 ++------------------------ 1 file changed, 2 insertions(+), 48 deletions(-) diff --git a/lib/MetaCPAN/Web/Model/API/Favorite.pm b/lib/MetaCPAN/Web/Model/API/Favorite.pm index 72ee76aa67..30e9bfefca 100644 --- a/lib/MetaCPAN/Web/Model/API/Favorite.pm +++ b/lib/MetaCPAN/Web/Model/API/Favorite.pm @@ -17,54 +17,8 @@ sub get { return Future->wrap( {} ); } - return $self->request( - '/favorite/_search', - { - size => 0, - query => { - terms => { 'distribution' => \@distributions } - }, - aggregations => { - favorites => { - terms => { - field => 'distribution', - size => scalar @distributions, - }, - }, - $user - ? ( - myfavorites => { - filter => { term => { 'user' => $user } }, - aggregations => { - enteries => { - terms => { field => 'distribution' } - } - } - } - ) - : (), - } - } - )->transform( - done => sub { - my $data = shift; - return { - took => $data->{took}, - favorites => { - map { $_->{key} => $_->{doc_count} } - @{ $data->{aggregations}->{favorites}->{buckets} } - }, - myfavorites => $user - ? { - map { $_->{key} => $_->{doc_count} } @{ - $data->{aggregations}->{myfavorites}->{entries} - ->{buckets} - } - } - : {}, - }; - } - ); + return $self->request( '/favorite/agg_by_distributions', + { user => $user, distribution => \@distributions } ); } sub by_user {