diff options
author | Matthew Somerville <matthew-github@dracos.co.uk> | 2017-05-30 16:12:30 +0100 |
---|---|---|
committer | Matthew Somerville <matthew-github@dracos.co.uk> | 2017-05-31 16:55:17 +0100 |
commit | a752a967ffd846e2ea6eb7f6a4789b0bf1a8dbf0 (patch) | |
tree | 3a2c29cad99775c96333097b241af7193d717cb4 /perllib/FixMyStreet/DB/Result/Comment.pm | |
parent | 1bb94cd0bf0821927b3f449d832a9982b0397fa9 (diff) |
Add update URL model method.
Diffstat (limited to 'perllib/FixMyStreet/DB/Result/Comment.pm')
-rw-r--r-- | perllib/FixMyStreet/DB/Result/Comment.pm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/DB/Result/Comment.pm b/perllib/FixMyStreet/DB/Result/Comment.pm index cf1ba444d..815c5cd81 100644 --- a/perllib/FixMyStreet/DB/Result/Comment.pm +++ b/perllib/FixMyStreet/DB/Result/Comment.pm @@ -149,6 +149,11 @@ sub confirm { $self->confirmed( \'current_timestamp' ); } +sub url { + my $self = shift; + return "/report/" . $self->problem_id . '#update_' . $self->id; +} + sub photos { my $self = shift; my $photoset = $self->get_photoset; |