X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMouse%2FMeta%2FTypeConstraint.pm;h=94c0f6640a1a580c16db1b4a24b0c3f1fd2cddf9;hb=db562c3b335ff4d8df3095cefdbf95d3c89009d8;hp=182ee88166f732db2ca8d98143b17ee9be1a111c;hpb=5a592ad728880fb6a21e9610cbfeb1670f2053ab;p=gitmo%2FMouse.git diff --git a/lib/Mouse/Meta/TypeConstraint.pm b/lib/Mouse/Meta/TypeConstraint.pm index 182ee88..94c0f66 100644 --- a/lib/Mouse/Meta/TypeConstraint.pm +++ b/lib/Mouse/Meta/TypeConstraint.pm @@ -48,13 +48,9 @@ sub new { return $self; } -sub create_child_type{ +sub create_child_type { my $self = shift; - return ref($self)->new( - @_, - # and inherits other attributes from the parent - parent => $self, - ); + return ref($self)->new(@_, parent => $self); } sub name; @@ -245,7 +241,7 @@ Mouse::Meta::TypeConstraint - The Mouse Type Constraint metaclass =head1 VERSION -This document describes Mouse version 0.71 +This document describes Mouse version 0.72 =head1 DESCRIPTION