From ec70c9075632b282103120e9c2822dc5956840a3 Mon Sep 17 00:00:00 2001 From: Mickey Nasriachi Date: Mon, 28 Aug 2023 08:40:01 +0200 Subject: [PATCH] release/recent: fix warnings + page_size Some internal values are incorrect due to lack of defaults. This caused `page_size` not to work when not combined with `page` --- lib/MetaCPAN/Query/Release.pm | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/lib/MetaCPAN/Query/Release.pm b/lib/MetaCPAN/Query/Release.pm index 14ef8e871..22df8c5f9 100644 --- a/lib/MetaCPAN/Query/Release.pm +++ b/lib/MetaCPAN/Query/Release.pm @@ -829,6 +829,10 @@ sub _get_depended_releases { sub recent { my ( $self, $page, $page_size, $type ) = @_; + $page //= 1; + $page_size //= 10000; + $type //= ''; + my $query; my $from = ( $page - 1 ) * $page_size;