From e0f9ce9218fe3151fe6e395038bcd088dbafad2a Mon Sep 17 00:00:00 2001
From: "Jonathan \"Duke\" Leto" <jonathan@leto.net>
Date: Sat, 8 Jan 2011 01:44:59 -0800
Subject: Add ability to disable perlbrew

This option comes in handy for those that want to run long test suites
on just one version of Perl and/or those using local::lib (which doesn't
play nice with perlbrew with XS modules).
---
 scripts/capsule.sh | 37 +++++++++++++++++++++++--------------
 1 file changed, 23 insertions(+), 14 deletions(-)

(limited to 'scripts')

diff --git a/scripts/capsule.sh b/scripts/capsule.sh
index 7411639..cd102a7 100755
--- a/scripts/capsule.sh
+++ b/scripts/capsule.sh
@@ -3,27 +3,36 @@
 # first arg:  build_dir
 # second arg: report path
 
+# this is getting smelly
 builddir=$1
 report_path=$2
+perlbrew=$3
 
 echo "Creating report_path=$report_path"
 mkdir -p $report_path
 
 cd $builddir
 
-source $HOME/perl5/perlbrew/etc/bashrc
-
-for perl in $HOME/perl5/perlbrew/perls/perl-5.*
-do
-    theperl="$(basename $perl)"
-
-    echo ">perlbrew switch $theperl"
-    perlbrew switch $theperl
-    # TODO: check error condition
-
-    perlversion=$(perl -v)
-    logfile="$report_path/$theperl.txt"
-
+if [ $use_perlbrew ]; then
+    source $HOME/perl5/perlbrew/etc/bashrc
+    for perl in $HOME/perl5/perlbrew/perls/perl-5.*
+    do
+        theperl="$(basename $perl)"
+
+        echo ">perlbrew switch $theperl"
+        perlbrew switch $theperl
+        # TODO: check error condition
+
+        logfile="$report_path/$theperl.txt"
+        jitterbug_build
+    done
+else
+        theperl="$(basename perl -e \"print $]\")"
+        logfile="$report_path/$theperl.txt"
+        jitterbug_build
+fi
+
+function jitterbug_build () {
     if [ -f 'dist.ini' ]; then
         echo "Found dist.ini, using Dist::Zilla"
         dzil authordeps | cpanm
@@ -42,4 +51,4 @@ do
         make
         HARNESS_VERBOSE=1 make test >> $logfile 2>&1
     fi
-done
+}
-- 
cgit 1.4.1