diff options
| author | Matthew Somerville <matthew@mysociety.org> | 2020-04-28 15:38:54 +0100 |
|---|---|---|
| committer | Matthew Somerville <matthew@mysociety.org> | 2020-04-28 15:38:56 +0100 |
| commit | a0d40e1a354cfd6c53e97a5fc72001091d33a04f (patch) | |
| tree | 2bc3a2a0877d9507d1f6ec980d29fbd12d21b806 /perllib | |
| parent | 63a9b3c81a58ced0c63fa7c02a45535cde91acae (diff) | |
Use server cursors on dashboard export.
Diffstat (limited to 'perllib')
| -rw-r--r-- | perllib/FixMyStreet/App/Controller/Dashboard.pm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/App/Controller/Dashboard.pm b/perllib/FixMyStreet/App/Controller/Dashboard.pm index 058fa3806..27c8630f0 100644 --- a/perllib/FixMyStreet/App/Controller/Dashboard.pm +++ b/perllib/FixMyStreet/App/Controller/Dashboard.pm @@ -328,6 +328,7 @@ sub export_as_csv_updates : Private { objects => $c->stash->{objects_rs}->search_rs({}, { order_by => ['me.confirmed', 'me.id'], '+columns' => ['problem.bodies_str'], + cursor_page_size => 1000, }), headers => [ 'Report ID', 'Update ID', 'Date', 'Status', 'Problem state', @@ -350,6 +351,7 @@ sub export_as_csv : Private { objects => $c->stash->{objects_rs}->search_rs({}, { prefetch => 'comments', order_by => ['me.confirmed', 'me.id'], + cursor_page_size => 1000, }), headers => [ 'Report ID', |