projects
/
gitmo/MooseX-Dependent.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
(parent:
9c319ad
)
updated makefile requirements and got the basics of coercions in place
john napiorkowski [Fri, 22 May 2009 19:52:59 +0000 (15:52 -0400)]
lib/MooseX/Dependent/Meta/TypeConstraint/Dependent.pm
patch
|
blob
|
blame
|
history
diff --git
a/lib/MooseX/Dependent/Meta/TypeConstraint/Dependent.pm
b/lib/MooseX/Dependent/Meta/TypeConstraint/Dependent.pm
index
79ca107
..
12003dc
100644
(file)
--- a/
lib/MooseX/Dependent/Meta/TypeConstraint/Dependent.pm
+++ b/
lib/MooseX/Dependent/Meta/TypeConstraint/Dependent.pm
@@
-297,7
+297,7
@@
around 'coerce' => sub {
my ($coerce, $self, @args) = @_;
if($self->coercion) {
if(my $value = $self->$coerce(@args)) {
- return $value;
+ return $value if defined $value;
}
}
return $self->parent->coerce(@args);