package MusicBrainz::Server::Entity::WorkAttribute;
use Moose;
use MusicBrainz::Server::Entity::Types;
use MusicBrainz::Server::Translation::Attributes qw( lp );

has type_id => (
    isa => 'Int',
    required => 1,
    is => 'ro',
);

has type => (
    isa => 'WorkAttributeType',
    is => 'rw',
);

has value_id => (
    isa => 'Maybe[Int]',
    required => 1,
    is => 'ro',
);

has value => (
    isa => 'Str',
    required => 1,
    is => 'ro',
);

sub l_value {
    my $self = shift;
    return $self->value_id ? lp($self->value, 'work_attribute_type_allowed_value') : $self->value;
}

__PACKAGE__->meta->make_immutable;
1;