1package Moose::Exception::ClassDoesNotHaveInitMeta; 2our $VERSION = '2.2201'; 3 4use Moose; 5extends 'Moose::Exception'; 6with 'Moose::Exception::Role::Class'; 7 8has 'traits' => ( 9 is => 'ro', 10 isa => 'ArrayRef', 11 required => 1 12); 13 14sub _build_message { 15 my $self = shift; 16 my $class = $self->class_name; 17 18 return "Cannot provide traits when $class does not have an init_meta() method"; 19} 20 21__PACKAGE__->meta->make_immutable; 221; 23