diff options
| author | Marius Halden <marius.h@lden.org> | 2017-11-03 16:13:59 +0100 |
|---|---|---|
| committer | Marius Halden <marius.h@lden.org> | 2017-11-03 16:13:59 +0100 |
| commit | 42d874db498d0fabae92d0c87acf99054d92391b (patch) | |
| tree | d0cf5afdee3d244c4e5da6fe1ab9acba620634df /perllib/FixMyStreet/DB/ResultSet/Body.pm | |
| parent | 19a7c5dda85a47a68040c742791e9cd9d3e52be6 (diff) | |
| parent | dc7613329c275cd158fdde8faf1c0e301f5b7202 (diff) | |
Merge tag 'v2.2' into fiksgatami-dev
Diffstat (limited to 'perllib/FixMyStreet/DB/ResultSet/Body.pm')
| -rw-r--r-- | perllib/FixMyStreet/DB/ResultSet/Body.pm | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/DB/ResultSet/Body.pm b/perllib/FixMyStreet/DB/ResultSet/Body.pm index 6802ed604..e79d038b1 100644 --- a/perllib/FixMyStreet/DB/ResultSet/Body.pm +++ b/perllib/FixMyStreet/DB/ResultSet/Body.pm @@ -14,4 +14,15 @@ sub for_areas { return $result; } +sub all_translated { + my $rs = shift; + my $schema = $rs->result_source->schema; + my @bodies = $rs->search(undef, { + '+columns' => { 'msgstr' => 'translations.msgstr' }, + join => 'translations', + bind => [ 'name', $schema->lang, 'body' ], + })->all; + return @bodies; +} + 1; |