[carton] 406/472: Only select MYMETA actually matching the dist

[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 4293059cb59c4ccf5cfea8d585a2b481e43681dc
Author: Tatsuhiko Miyagawa <miyagawa at bulknews.net>
Date:   Sat Aug 10 21:47:14 2013 -0700

    Only select MYMETA actually matching the dist
---
 lib/Carton/Packer.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lib/Carton/Packer.pm b/lib/Carton/Packer.pm
index e261be2..6c8b351 100644
--- a/lib/Carton/Packer.pm
+++ b/lib/Carton/Packer.pm
@@ -80,7 +80,8 @@ sub installed_meta {
     my @meta;
     my $finder = sub {
         if (m!\b$dist-.*[\\/]MYMETA.json!) {
-            push @meta, CPAN::Meta->load_file($_);
+            my $meta = CPAN::Meta->load_file($_);
+            push @meta, $meta if $meta->name eq $dist;
         }
     };
 

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