diff options
| author | doy <doy@tozt.net> | 2009-01-12 23:01:19 -0500 |
|---|---|---|
| committer | doy <doy@tozt.net> | 2009-01-12 23:01:19 -0500 |
| commit | 3f1a3a0dc5b15d4b038a3075a8df50fda36b0dea (patch) | |
| tree | 8549193d8f65958766f388e1782ce68d6f575d42 | |
| parent | ee8afbc45c13b4d20f8726d9b80a6a935c5c964e (diff) | |
| download | moosex-role-matcher-3f1a3a0dc5b15d4b038a3075a8df50fda36b0dea.tar.gz moosex-role-matcher-3f1a3a0dc5b15d4b038a3075a8df50fda36b0dea.zip | |
explicitly return 0 on a failed arrayref match
| -rw-r--r-- | lib/MooseX/Role/Matcher.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lib/MooseX/Role/Matcher.pm b/lib/MooseX/Role/Matcher.pm index 3080348..e6963cd 100644 --- a/lib/MooseX/Role/Matcher.pm +++ b/lib/MooseX/Role/Matcher.pm @@ -168,6 +168,7 @@ method _match => sub { for (@$seek) { return 1 if $self->_match($value => $_); } + return 0; } if (ref($seek) eq 'HASH') { return 0 unless blessed($value) && |