extends any_moose('Meta::TypeConstraint');
+=head1 ATTRIBUTES
+
+=head2 C<mapper>
+
+=cut
+
has 'mapper' => (
is => 'ro',
isa => 'CodeRef',
);
+=head2 C<parent_name>
+
+=cut
+
has 'parent_name' => (
is => 'ro',
isa => 'ClassName',
required => 1,
);
+=head2 C<user_constraint>
+
+=cut
+
has 'user_constraint' => (
is => 'ro',
isa => 'Maybe[CodeRef]',
required => 1,
);
+=head1 METHODS
+
+=cut
+
around 'new' => sub {
my ($orig, $class, %args) = @_;
$tc = $class->$orig(%args);
};
+=head2 C<load>
+
+=cut
+
sub load {
my ($tc, $thing) = @_;