perllib/FixMyStreet/DB/ResultSet/ResponsePriority.pm


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

package FixMyStreet::DB::ResultSet::ResponsePriority;
use base 'DBIx::Class::ResultSet';

use strict;
use warnings;
use Moo;

with('FixMyStreet::Roles::ContactExtra');

sub join_table {
    return 'contact_response_priorities';
}

sub map_extras {
    my ($rs, @ts) = @_;
    return map { { id => $_->id, name => $_->name } } @ts;
}

1;