diff options
| author | Struan Donald <struan@exo.org.uk> | 2011-06-07 17:34:08 +0100 |
|---|---|---|
| committer | Struan Donald <struan@exo.org.uk> | 2011-06-07 17:34:08 +0100 |
| commit | 5813d21b9ac8b358a557ab67722e8b54c769b663 (patch) | |
| tree | d8d81597e1abf13855d27dd1b3a5353ca2f3240c /perllib/FixMyStreet/DB/ResultSet/Comment.pm | |
| parent | 0f7de6563d4c96fa1ec9c429cca7e42259e25422 (diff) | |
move summary count fetching out to result sets
Diffstat (limited to 'perllib/FixMyStreet/DB/ResultSet/Comment.pm')
| -rw-r--r-- | perllib/FixMyStreet/DB/ResultSet/Comment.pm | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/DB/ResultSet/Comment.pm b/perllib/FixMyStreet/DB/ResultSet/Comment.pm index 4719c7a24..70f8027aa 100644 --- a/perllib/FixMyStreet/DB/ResultSet/Comment.pm +++ b/perllib/FixMyStreet/DB/ResultSet/Comment.pm @@ -24,4 +24,18 @@ sub timeline { ); } +sub summary_count { + my ( $rs, $restriction ) = @_; + + return $rs->search( + $restriction, + { + group_by => ['me.state'], + select => [ 'me.state', { count => 'me.id' } ], + as => [qw/state state_count/], + join => 'problem' + } + ); +} + 1; |