diff options
| author | Matthew Somerville <matthew-github@dracos.co.uk> | 2018-10-08 09:03:41 +0100 |
|---|---|---|
| committer | Matthew Somerville <matthew-github@dracos.co.uk> | 2018-10-08 12:53:22 +0100 |
| commit | 7f7431377721bc64c3816e5af4f54bdd5f6cd064 (patch) | |
| tree | dfb1783f4b3c982a224a12ea6072c69a396aa57f /perllib/FixMyStreet/App/Controller/Dashboard.pm | |
| parent | 06d166694a9253b99a9c2720266b8b5cdc557d0f (diff) | |
Speed up dashboard CSV export.
Without fetching bodies_str, the update export was doing a query per
update to fetch the corresponding problem.
[BANES] Speed up extra columns by prefetching the relevant users.
Diffstat (limited to 'perllib/FixMyStreet/App/Controller/Dashboard.pm')
| -rw-r--r-- | perllib/FixMyStreet/App/Controller/Dashboard.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/App/Controller/Dashboard.pm b/perllib/FixMyStreet/App/Controller/Dashboard.pm index 14042732e..5ebdff31b 100644 --- a/perllib/FixMyStreet/App/Controller/Dashboard.pm +++ b/perllib/FixMyStreet/App/Controller/Dashboard.pm @@ -304,6 +304,7 @@ sub export_as_csv_updates : Private { my $csv = $c->stash->{csv} = { objects => $c->stash->{objects_rs}->search_rs({}, { order_by => ['me.confirmed', 'me.id'], + '+columns' => ['problem.bodies_str'], }), headers => [ 'Report ID', 'Update ID', 'Date', 'Status', 'Problem state', |