[carton] 105/472: fix check

[Lucas Kanashiro]

This is an automated email from the git hooks/post-receive script.

kanashiro-guest pushed a commit to branch master
in repository carton.

commit 9dda4b2ac41669e1562460e939ddfb2a5187be3b
Author: Tatsuhiko Miyagawa <miyagawa at bulknews.net>
Date:   Thu Oct 13 10:36:08 2011 +0900

    fix check
---
 lib/Carton.pm | 10 ++++------
 1 file changed, 4 insertions(+), 6 deletions(-)

diff --git a/lib/Carton.pm b/lib/Carton.pm
index 97f0959..8399950 100644
--- a/lib/Carton.pm
+++ b/lib/Carton.pm
@@ -367,12 +367,10 @@ sub _check_satisfies {
         return;
     }
 
-    my $meta = $found->{meta};
-    for my $requires (values %{$meta->{requires}}) {
-        for my $module (keys %$requires) {
-            next if $module eq 'perl';
-            $self->_check_satisfies([ $module, $requires->{$module} ], $unsatisfied, $index, $pool);
-        }
+    my $requires = $self->merge_prereqs($found->{meta}{mymeta}{prereqs});
+    for my $module (keys %$requires) {
+        next if $module eq 'perl';
+        $self->_check_satisfies([ $module, $requires->{$module} ], $unsatisfied, $index, $pool);
     }
 }
 

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/carton.git