lib/Moose/Exception/Role/Role.pm


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

package Moose::Exception::Role::Role;
our $VERSION = '2.1405';

# use Moose::Util 'throw_exception';
use Moose::Role;

has 'role_name' => (
    is            => 'ro',
    isa           => 'Str',
    required      => 1,
    documentation => "This attribute can be used for fetching metaclass instance:\n".
                     "    my \$metaclass_instance = Moose::Util::find_meta( \$exception->role_name );\n",

);

1;