diff options
Diffstat (limited to 'perllib/FixMyStreet/DB/ResultSet/ReportExtraField.pm')
-rw-r--r-- | perllib/FixMyStreet/DB/ResultSet/ReportExtraField.pm | 25 |
1 files changed, 25 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/DB/ResultSet/ReportExtraField.pm b/perllib/FixMyStreet/DB/ResultSet/ReportExtraField.pm new file mode 100644 index 000000000..9c47b1894 --- /dev/null +++ b/perllib/FixMyStreet/DB/ResultSet/ReportExtraField.pm @@ -0,0 +1,25 @@ +package FixMyStreet::DB::ResultSet::ReportExtraField; +use base 'DBIx::Class::ResultSet'; + +use strict; +use warnings; + +sub for_cobrand { + my ( $rs, $cobrand ) = @_; + + my $result = $rs->search( + { cobrand => [ undef, $cobrand->moniker, '' ] } + ); + return $result; +} + +sub for_language { + my ( $rs, $language ) = @_; + + my $result = $rs->search( + { language => [ undef, $language, '' ] } + ); + return $result; +} + +1; |