From 969b62c1be0b8e3b548ad1ba395d09f6393b89b8 Mon Sep 17 00:00:00 2001 From: "Jonathan \"Duke\" Leto" Date: Sun, 9 Jan 2011 01:21:56 -0800 Subject: Attempt grab perl version correctly --- scripts/capsule.sh | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/scripts/capsule.sh b/scripts/capsule.sh index 45188f0..818dcf4 100755 --- a/scripts/capsule.sh +++ b/scripts/capsule.sh @@ -38,17 +38,17 @@ if [ $use_perlbrew ]; then source $HOME/perl5/perlbrew/etc/bashrc for perl in $HOME/perl5/perlbrew/perls/perl-5.* do - theperl="$(basename $perl)" + theperl="$(perl -e \"print $]\")" + logfile="$report_path/perl-$theperl.txt" 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" + theperl="$(perl -e \"print $]\")" + logfile="$report_path/perl-$theperl.txt" jitterbug_build fi -- cgit 1.4.1