diff options
Diffstat (limited to 'perllib/FixMyStreet/App/Controller/Admin.pm')
-rw-r--r-- | perllib/FixMyStreet/App/Controller/Admin.pm | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/App/Controller/Admin.pm b/perllib/FixMyStreet/App/Controller/Admin.pm index 1158b688a..504de19ca 100644 --- a/perllib/FixMyStreet/App/Controller/Admin.pm +++ b/perllib/FixMyStreet/App/Controller/Admin.pm @@ -883,6 +883,8 @@ sub report_edit : Path('report_edit') : Args(1) { $c->forward('categories_for_point'); + $c->forward('alerts_for_report'); + $c->forward('check_username_for_abuse', [ $problem->user ] ); $c->stash->{updates} = @@ -1111,6 +1113,17 @@ sub categories_for_point : Private { $c->stash->{categories_hash} = { map { $_->category => 1 } @{$c->stash->{category_options}} }; } +sub alerts_for_report : Private { + my ($self, $c) = @_; + + $c->stash->{alert_count} = $c->model('DB::Alert')->search({ + alert_type => 'new_updates', + parameter => $c->stash->{report}->id, + confirmed => 1, + whendisabled => undef, + })->count(); +} + sub templates : Path('templates') : Args(0) { my ( $self, $c ) = @_; |