diff options
Diffstat (limited to 'perllib')
| -rw-r--r-- | perllib/FixMyStreet/App/Controller/Reports.pm | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/App/Controller/Reports.pm b/perllib/FixMyStreet/App/Controller/Reports.pm index 5b3283a2c..6f38ec101 100644 --- a/perllib/FixMyStreet/App/Controller/Reports.pm +++ b/perllib/FixMyStreet/App/Controller/Reports.pm @@ -369,6 +369,7 @@ sub load_and_group_problems : Private { my $page = $c->req->params->{p} || 1; my $type = $c->req->params->{t} || 'all'; + my $category = $c->req->params->{c} || ''; my $where = { non_public => 0, @@ -394,6 +395,10 @@ sub load_and_group_problems : Private { $where->{state} = $not_open; } + if ($category) { + $where->{category} = $category; + } + if ($c->stash->{ward}) { $where->{areas} = { 'like', '%,' . $c->stash->{ward}->{id} . ',%' }; $where->{bodies_str} = [ @@ -415,6 +420,7 @@ sub load_and_group_problems : Private { { 'like', '%,' . $c->stash->{body}->id }, ]; } + my $problems = $c->cobrand->problems->search( $where, { |