(exists $options->{isa})
|| confess "You must define a type with the $type metaclass";
- my $isa = $options->{isa};
+ my $isa = $options->{isa};
unless (blessed($isa) && $isa->isa('Moose::Meta::TypeConstraint')) {
$isa = find_type_constraint($isa);
($isa->is_a_type_of($type))
|| confess "The type constraint for a $type ($options->{isa}) must be a subtype of $type";
}
-
- # this can be augmented by subclasses ..
- inner();
}
before '_process_options' => sub {