diff options
author | pezholio <pezholio@gmail.com> | 2017-01-24 16:20:48 +0000 |
---|---|---|
committer | Dave Arter <davea@mysociety.org> | 2017-02-27 13:18:03 +0000 |
commit | 587a125c46f229ed23aaf68d3308f6755e2d8299 (patch) | |
tree | c6bff793a2dd44bc249326fdf8b2c187e20ef4ea /perllib/FixMyStreet/DB/Result/Problem.pm | |
parent | 36838708a432de937828f6a8ef4aff608654f900 (diff) |
[Oxfordshire] Use 'days ago' format on problem lists
Fixes mysociety/fixmystreetforcouncils#98
Diffstat (limited to 'perllib/FixMyStreet/DB/Result/Problem.pm')
-rw-r--r-- | perllib/FixMyStreet/DB/Result/Problem.pm | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/DB/Result/Problem.pm b/perllib/FixMyStreet/DB/Result/Problem.pm index d78eda78f..4ccad3690 100644 --- a/perllib/FixMyStreet/DB/Result/Problem.pm +++ b/perllib/FixMyStreet/DB/Result/Problem.pm @@ -697,6 +697,20 @@ sub time_ago { return Utils::prettify_duration( $duration ); } +=head2 days_ago + + Returns how many days ago a problem was reported. + +=cut + +sub days_ago { + my ( $self, $date ) = @_; + $date ||= 'confirmed'; + my $now = DateTime->now( time_zone => FixMyStreet->time_zone || FixMyStreet->local_time_zone ); + my $duration = $now->delta_days($self->$date); + return $duration->delta_days; +} + =head2 response_templates Returns all ResponseTemplates attached to this problem's bodies, in alphabetical |