From: John Napiorkowski Date: Wed, 20 Aug 2008 22:05:39 +0000 (+0000) Subject: more refactoring to a common role and related cleanup X-Git-Tag: 0.01~38 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=740eb6a9ed51c052288d700e3ffef9d99a88e632;hp=bc5c0758d92c58286c4ba66a613850492525d752;p=gitmo%2FMooseX-Types-Structured.git more refactoring to a common role and related cleanup --- diff --git a/lib/MooseX/Meta/TypeConstraint/Structured/Positional.pm b/lib/MooseX/Meta/TypeConstraint/Structured/Positional.pm index e495372..ffaae20 100644 --- a/lib/MooseX/Meta/TypeConstraint/Structured/Positional.pm +++ b/lib/MooseX/Meta/TypeConstraint/Structured/Positional.pm @@ -5,6 +5,7 @@ use Moose::Meta::TypeConstraint (); use Moose::Util::TypeConstraints; extends 'Moose::Meta::TypeConstraint'; +with 'MooseX::Meta::TypeConstraint::Role::Structured'; =head1 NAME @@ -57,10 +58,8 @@ contraint container. =cut -has 'signature' => ( - is=>'ro', +has '+signature' => ( isa=>'ArrayRef[Moose::Meta::TypeConstraint]', - required=>1, ); =head2 optional_signature