From: John Napiorkowski Date: Mon, 30 Mar 2009 15:58:24 +0000 (+0000) Subject: last bit of yak shaving until I get feedback from the cabal X-Git-Tag: 0.01~37 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=809380d597e1d2eff119f250c8c8421f788c1f1e;p=gitmo%2FMooseX-Dependent.git last bit of yak shaving until I get feedback from the cabal --- diff --git a/lib/MooseX/Meta/TypeConstraint/Dependent.pm b/lib/MooseX/Meta/TypeConstraint/Dependent.pm index ae6ca56..83d140c 100644 --- a/lib/MooseX/Meta/TypeConstraint/Dependent.pm +++ b/lib/MooseX/Meta/TypeConstraint/Dependent.pm @@ -237,20 +237,6 @@ around 'create_child_type' => sub { ); }; -=head2 constraint - -We modify constraint so that the value pass is automatically dereferenced - -=cut - -around 'constraint' => sub { - my ($constraint, $self) = @_; - return sub { - my ($arg) = @_; - $self->$constraint->($arg); - }; -}; - =head2 is_a_type_of =head2 is_subtype_of