[Alloy] Increase per-page to 100.

mysociety · Nov 8, 2024 · 919c30d · 919c30d
1 parent 0ef329a
commit 919c30d
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/perllib/Integrations/AlloyV2.pm b/perllib/Integrations/AlloyV2.pm
@@ -184,7 +184,7 @@ sub search {
     return [] unless $result_count;
 
     my $maxPages = 100;
-    my $pageSize = $result_count <= 2000 ? 20 : ( ceil($result_count / $maxPages) + 1 );
+    my $pageSize = $result_count <= 10000 ? 100 : ( ceil($result_count / $maxPages) + 1 );
     my $pages = int( $result_count / $pageSize ) + 1;
 
     my $query_body = $body_base;