lib/MooseX/ABC/Role/Object.pm


1
2
3
4
5
6
7
8
9
10
11
12

package MooseX::ABC::Role::Object;
use Moose::Role;

sub new {
    my $class = shift;
    Class::MOP::class_of($class)->throw_error(
        "$class is abstract, it cannot be instantiated"
    );
}

no Moose::Role;
1;