[SCM] libcpan-meta-check-perl Debian packaging branch, master, updated. debian/0.004-1-39-g7d96c48

Leon Timmermans fawaka at gmail.com
Wed Apr 24 12:40:40 UTC 2013


The following commit has been merged in the master branch:
commit 10d0fade5debe657154154b486985a3511be6fd4
Author: Leon Timmermans <fawaka at gmail.com>
Date:   Thu Apr 5 01:05:14 2012 +0200

    Allow CPAN::Meta::Requirements instead of CPAN::Meta

diff --git a/Changes b/Changes
index 54ac9ce..bb7ce0e 100644
--- a/Changes
+++ b/Changes
@@ -2,6 +2,7 @@ Revision history for CPAN-Meta-Check
 
 {{$NEXT}}
           Add explicit dependency on CPAN::Meta 2.120920
+          Allow CPAN::Meta::Requirements instead of CPAN::Meta
 
 0.001     2012-04-01 12:46:04 Europe/Amsterdam
           Initial release
diff --git a/lib/CPAN/Meta/Check.pm b/lib/CPAN/Meta/Check.pm
index 99731b6..3620f94 100644
--- a/lib/CPAN/Meta/Check.pm
+++ b/lib/CPAN/Meta/Check.pm
@@ -35,13 +35,14 @@ sub _check_conflict {
 
 sub requirements_for {
 	my ($meta, $phases, $type) = @_;
+	my $prereqs = ref($meta) eq 'CPAN::Meta' ? $meta->effective_prereqs : $meta;
 	if (!ref $phases) {
-		return $meta->effective_prereqs->requirements_for($phases, $type);
+		return $prereqs->requirements_for($phases, $type);
 	}
 	else {
 		my $ret = CPAN::Meta::Requirements->new;
 		for my $phase (@{ $phases }) {
-			$ret->add_requirements($meta->effective_prereqs->requirements_for($phase, $type));
+			$ret->add_requirements($prereqs->requirements_for($phase, $type));
 		}
 		return $ret;
 	}

-- 
libcpan-meta-check-perl Debian packaging



More information about the Pkg-perl-cvs-commits mailing list