diff options
| author | Matthew Somerville <matthew@mysociety.org> | 2020-04-29 14:11:54 +0100 |
|---|---|---|
| committer | Matthew Somerville <matthew@mysociety.org> | 2020-04-29 14:11:54 +0100 |
| commit | 19088df5efeb30ba3855893fc5080c5125a85152 (patch) | |
| tree | ac7c5dcc4f5d9879085f5fb526d68f5791cd2cd5 /perllib/FixMyStreet/App/Controller/Admin/Reports.pm | |
| parent | 6eed68ab198cc1b9fdb683928886f6abff4f7434 (diff) | |
| parent | e1605415077d30c1d5f86017486e74ebc498063a (diff) | |
Merge branch 'server-side-cursor-dashboard-export'
Diffstat (limited to 'perllib/FixMyStreet/App/Controller/Admin/Reports.pm')
| -rw-r--r-- | perllib/FixMyStreet/App/Controller/Admin/Reports.pm | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/perllib/FixMyStreet/App/Controller/Admin/Reports.pm b/perllib/FixMyStreet/App/Controller/Admin/Reports.pm index ef9736ff6..7300fe676 100644 --- a/perllib/FixMyStreet/App/Controller/Admin/Reports.pm +++ b/perllib/FixMyStreet/App/Controller/Admin/Reports.pm @@ -108,7 +108,8 @@ sub index : Path { my $problems = $c->cobrand->problems->search( $query, { - prefetch => 'user', + join => 'user', + '+columns' => 'user.email', rows => 50, order_by => $order, } @@ -150,8 +151,9 @@ sub index : Path { -or => $query, }, { - -select => [ 'me.*', qw/problem.bodies_str problem.state/ ], - prefetch => [qw/user problem/], + '+columns' => ['user.email'], + join => 'user', + prefetch => [qw/problem/], rows => 50, order_by => { -desc => 'me.id' } } |