package Bread::Board::Literal;
BEGIN {
$Bread::Board::Literal::AUTHORITY = 'cpan:STEVAN';
}
{
$Bread::Board::Literal::VERSION = '0.30';
}
use Moose;
with 'Bread::Board::Service';
has 'value' => (
is => 'rw',
isa => 'Defined',
required => 1,
);
sub get { (shift)->value }
sub clone_and_inherit_params {
confess 'Trying to inherit from a literal service';
}
__PACKAGE__->meta->make_immutable;
no Moose; 1;
__END__
=pod
=head1 NAME
Bread::Board::Literal
=head1 VERSION
version 0.30
=head1 DESCRIPTION
=head1 METHODS
=over 4
=item B<get>
=item B<value>
=item B<clone_and_inherit_params>
=back
=head1 BUGS
All complex software has bugs lurking in it, and this module is no
exception. If you find a bug please either email me, or add the bug
to cpan-RT.
=head1 AUTHOR
Stevan Little <stevan@iinteractive.com>
=head1 COPYRIGHT AND LICENSE
This software is copyright (c) 2014 by Infinity Interactive.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
=cut