[libmoosex-has-sugar-perl] 54/120: Abstract out fix logic, and drop need for Git bundle fix, as upstream have fixed it

[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 ecddf3559c16b47542d3981a22ea4997ba49a50e
Author: Kent Fredric <kentfredric at gmail.com>
Date:   Tue Oct 29 21:23:12 2013 +1300

    Abstract out fix logic, and drop need for Git bundle fix, as upstream have fixed it
---
 install_deps.pl | 28 ++++++++++++++++++++--------
 1 file changed, 20 insertions(+), 8 deletions(-)

diff --git a/install_deps.pl b/install_deps.pl
index d4fcd3b..7aa6b0b 100644
--- a/install_deps.pl
+++ b/install_deps.pl
@@ -47,6 +47,26 @@ sub cpanm {
   return 1;
 }
 
+my $got_fixes;
+
+sub get_fixes {
+  return if $got_fixes;
+  my $cwd = cwd();
+  chdir '/tmp';
+  safe_exec( 'git', 'clone', 'https://github.com/kentfredric/cpan-fixes.git' );
+  chdir $cwd;
+  $got_fixes = 1;
+}
+
+sub cpanm_fix {
+  my (@params) = @_;
+  get_fixes();
+  my $cwd = cwd();
+  chdir '/tmp/cpan-fixes';
+  cpanm(@params);
+  chdir $cwd;
+}
+
 if ( not env_exists('TRAVIS') ) {
   diag('Is not running under travis!');
   exit 1;
@@ -61,15 +81,7 @@ if ( env_is( 'TRAVIS_BRANCH', 'master' ) ) {
   cpanm( @params, '--dev',       'Dist::Zilla',   'Pod::Weaver' );
   safe_exec( 'git', 'config', '--global', 'user.email', 'kentfredric+travisci at gmail.com' );
   safe_exec( 'git', 'config', '--global', 'user.name',  'Travis CI ( On behalf of Kent Fredric )' );
-  mkdir '/tmp';
-  my $cwd = cwd();
-  chdir '/tmp';
-  safe_exec( 'git', 'clone', 'https://github.com/kentfredric/cpan-fixes.git' );
-  chdir '/tmp/cpan-fixes';
-  cpanm( @params, './Dist-Zilla-Plugin-Git-2.017.tar.gz' );
 
-  #cpanm( @params, './Dist-Zilla-Plugin-Prepender-1.132960.tar.gz' );
-  chdir $cwd;
   require Capture::Tiny;
   my $stdout = Capture::Tiny::capture_stdout(
     sub {

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