| Current Path : /usr/local/lib64/perl5/Moose/Exception/ |
| Current File : //usr/local/lib64/perl5/Moose/Exception/IllegalInheritedOptions.pm |
package Moose::Exception::IllegalInheritedOptions;
our $VERSION = '2.2201';
use Moose;
extends 'Moose::Exception';
with 'Moose::Exception::Role::ParamsHash';
has 'illegal_options' => (
is => 'ro',
traits => ['Array'],
handles => {
_join_options => 'join',
},
required => 1,
);
sub _build_message {
my $self = shift;
"Illegal inherited options => (".$self->_join_options(', ').")";
}
__PACKAGE__->meta->make_immutable;
1;