From: John Napiorkowski <jjnapiork@cpan.org>
Date: Wed, 1 Apr 2009 16:18:40 +0000 (+0000)
Subject: changed around to override since we are actually overriding this validation method
X-Git-Tag: 0.01~32
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=0712792e6e88947cb1207e65a137919e7fe344dc;p=gitmo%2FMooseX-Dependent.git

changed around to override since we are actually overriding this validation method
---

diff --git a/lib/MooseX/Meta/TypeConstraint/Dependent.pm b/lib/MooseX/Meta/TypeConstraint/Dependent.pm
index 7de4db2..6360c75 100644
--- a/lib/MooseX/Meta/TypeConstraint/Dependent.pm
+++ b/lib/MooseX/Meta/TypeConstraint/Dependent.pm
@@ -112,12 +112,12 @@ around 'new' => sub {
 
 =head2 validate
 
-We intercept validate in order to custom process the message
+We intercept validate in order to custom process the message.
 
 =cut
 
-around 'validate' => sub {
-    my ($validate, $self, @args) = @_;
+override 'validate' => sub {
+    my ($self, @args) = @_;
     my $compiled_type_constraint = $self->_compiled_type_constraint;
     my $message = bless {message=>undef}, 'MooseX::Types::Dependent::Message';
     my $result = $compiled_type_constraint->(@args, $message);