diff --git a/lib/MetaCPAN/Web/Model/API/Module.pm b/lib/MetaCPAN/Web/Model/API/Module.pm index 60340d8a9b..c6f1b44d07 100644 --- a/lib/MetaCPAN/Web/Model/API/Module.pm +++ b/lib/MetaCPAN/Web/Model/API/Module.pm @@ -49,12 +49,11 @@ sub search_web { sub first { my ( $self, $query ) = @_; - $self->request( "/search/simple", undef, { q => $query } )->transform( + $self->request( "/search/first", undef, { q => $query } )->transform( done => sub { my $data = shift; - return undef - unless ( $data->{hits}->{total} ); - return $data->{hits}->{hits}->[0]->{fields}->{documentation}; + return unless $data; + return $data->{documentation}; } ); }