fix ES query results reading (single values wrapped in arrayref)

metacpan · Jun 9, 2016 · 8a7d4de · 8a7d4de
1 parent a30b65d
commit 8a7d4de
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/lib/MetaCPAN/Web/Controller/Author.pm b/lib/MetaCPAN/Web/Controller/Author.pm
@@ -106,7 +106,8 @@ sub releases : Chained('root') PathPart Args(0) {
     my ( $author, $releases ) = ( $author_cv->recv, $releases_cv->recv );
     $c->detach('/not_found') unless ( $author->{pauseid} );
 
-    my @releases = map { $_->{fields} } @{ $releases->{hits}->{hits} };
+    my @releases = map { single_valued_arrayref_to_scalar( $_->{fields} ) }
+        @{ $releases->{hits}->{hits} };
 
     my $pageset = Data::Pageset->new(
         {