aboutsummaryrefslogtreecommitdiffstats
path: root/perllib/FixMyStreet/App/Controller/Admin.pm
diff options
context:
space:
mode:
authorMatthew Somerville <matthew@mysociety.org>2011-07-12 22:03:17 +0100
committerMatthew Somerville <matthew@mysociety.org>2011-07-12 22:03:17 +0100
commitd4870fd12c24d71141067e36ddd0be910c747c7e (patch)
tree19c77f70e1a6057becd03ae5d369d8655075b3a2 /perllib/FixMyStreet/App/Controller/Admin.pm
parentd225e0248b068b27eb31381afcaac8a827f46fbb (diff)
Unique users of problem reports, and summary table by category. Fixes #108.
Diffstat (limited to 'perllib/FixMyStreet/App/Controller/Admin.pm')
-rw-r--r--perllib/FixMyStreet/App/Controller/Admin.pm3
1 files changed, 3 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/App/Controller/Admin.pm b/perllib/FixMyStreet/App/Controller/Admin.pm
index abc454600..9fcb0c46d 100644
--- a/perllib/FixMyStreet/App/Controller/Admin.pm
+++ b/perllib/FixMyStreet/App/Controller/Admin.pm
@@ -60,6 +60,7 @@ sub index : Path : Args(0) {
$c->stash->{problems} = \%prob_counts;
$c->stash->{total_problems_live} =
$prob_counts{confirmed} + $prob_counts{fixed};
+ $c->stash->{total_problems_users} = $c->cobrand->problems->unique_users;
my $comments = $c->model('DB::Comment')->summary_count( $site_restriction );
@@ -106,6 +107,8 @@ sub index : Path : Args(0) {
: _('n/a');
$c->stash->{questionnaires} = \%questionnaire_counts;
+ $c->stash->{categories} = $c->cobrand->problems->categories_summary();
+
return 1;
}