diff options
| author | Matthew Somerville <matthew-github@dracos.co.uk> | 2017-08-10 12:34:16 +0100 |
|---|---|---|
| committer | Matthew Somerville <matthew-github@dracos.co.uk> | 2017-08-10 12:34:16 +0100 |
| commit | eda7a2d88e13a89e22843203cf4f749c8679b4d7 (patch) | |
| tree | 682568bc6f46d262e5755268ac65238af4562b52 /perllib/FixMyStreet/DB/Result/Body.pm | |
| parent | b862ad1300116978f98eae9a079a22d49fc4f85e (diff) | |
| parent | df1494f5a9de03c80764adf6108cbf699f547459 (diff) | |
Merge branch '1244-corps-translatable-body-names'
Diffstat (limited to 'perllib/FixMyStreet/DB/Result/Body.pm')
| -rw-r--r-- | perllib/FixMyStreet/DB/Result/Body.pm | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/DB/Result/Body.pm b/perllib/FixMyStreet/DB/Result/Body.pm index 9a64d1608..db7777053 100644 --- a/perllib/FixMyStreet/DB/Result/Body.pm +++ b/perllib/FixMyStreet/DB/Result/Body.pm @@ -121,12 +121,19 @@ __PACKAGE__->has_many( # Created by DBIx::Class::Schema::Loader v0.07035 @ 2017-02-13 15:11:11 # DO NOT MODIFY THIS OR ANYTHING ABOVE! md5sum:BOJANVwg3kR/1VjDq0LykA +use Moo; +use namespace::clean; + +with 'FixMyStreet::Roles::Translatable'; + sub url { my ( $self, $c, $args ) = @_; # XXX $areas_info was used here for Norway parent - needs body parents, I guess return $c->uri_for( '/reports/' . $c->cobrand->short_name( $self ), $args || {} ); } +around name => \&translate_around; + sub areas { my $self = shift; my %ids = map { $_->area_id => 1 } $self->body_areas->all; |