diff --git a/lib/MetaCPAN/Util.pm b/lib/MetaCPAN/Util.pm index 4d2c229dd..1dd745c5f 100644 --- a/lib/MetaCPAN/Util.pm +++ b/lib/MetaCPAN/Util.pm @@ -41,7 +41,8 @@ use Sub::Exporter -setup => { ) ] }; -use constant MAX_RESULT_WINDOW => 10000; +# Limit the maximum result window to 1000, really should be enough! +use constant MAX_RESULT_WINDOW => 1000; *true = \&Cpanel::JSON::XS::true; *false = \&Cpanel::JSON::XS::false;