diff options
| author | Matthew Somerville <matthew-github@dracos.co.uk> | 2016-06-22 16:36:37 +0100 |
|---|---|---|
| committer | Matthew Somerville <matthew-github@dracos.co.uk> | 2016-06-22 16:37:39 +0100 |
| commit | d20e84acc2beadad9a3f8fbfc55b5a3c8b06c9ba (patch) | |
| tree | 5f09dfd65f92f0dbcfc4e09df97a41672b815511 /perllib/FixMyStreet/App/Controller | |
| parent | 0c69e124a57891aa84aaf7c25773738db2a108c2 (diff) | |
Show any waiting reports on admin index page.
Diffstat (limited to 'perllib/FixMyStreet/App/Controller')
| -rw-r--r-- | perllib/FixMyStreet/App/Controller/Admin.pm | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/App/Controller/Admin.pm b/perllib/FixMyStreet/App/Controller/Admin.pm index 2fda70ad9..27b434f06 100644 --- a/perllib/FixMyStreet/App/Controller/Admin.pm +++ b/perllib/FixMyStreet/App/Controller/Admin.pm @@ -73,6 +73,13 @@ sub index : Path : Args(0) { $c->forward('stats_by_state'); + my @unsent = $c->model('DB::Problem')->search( { + state => [ 'confirmed' ], + whensent => undef, + bodies_str => { '!=', undef }, + } )->all; + $c->stash->{unsent_reports} = \@unsent; + my $alerts = $c->model('DB::Alert')->summary_report_alerts( $c->cobrand->restriction ); my %alert_counts = |