[libmoosex-has-sugar-perl] 19/120: Force getting develop deps from META.json

[Intrigeri]

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

intrigeri pushed a commit to annotated tag 0.05070422-source
in repository libmoosex-has-sugar-perl.

commit 8bdb1fb75f371c9e6acc051bd320829d3ce8cd09
Author: Kent Fredric <kentfredric at gmail.com>
Date:   Mon Oct 21 01:14:31 2013 +1300

    Force getting develop deps from META.json
---
 install_deps.pl | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/install_deps.pl b/install_deps.pl
index 4cffe5a..d11d333 100644
--- a/install_deps.pl
+++ b/install_deps.pl
@@ -29,7 +29,13 @@ if ( env_true('DEVELOPER_DEPS') ) {
 }
 safe_exec( 'cpanm', @params, '--installdeps', '.' );
 if ( env_true('AUTHOR_TESTING') or env_true('RELEASE_TESTING') ) {
-  safe_exec( 'cpanm', @params, '--with-develop', '--installdeps', '.' );
+  require CPAN::Meta;
+  my $meta    = CPAN::Meta->load_file('META.json');
+  my $prereqs = $meta->effective_prereqs;
+  my $reqs    = $prereqs->requirements_for( 'develop', 'requires' );
+  for my $module ( sort $reqs->required_modules ) {
+    safe_exec( 'cpanm', @params, $module . '~' . $reqs->requirements_for_module($module) );
+  }
 }
 
 exit 0;

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