Skip to content

Commit

Permalink
git-svn: allow test setup script to support PERL env. var
Browse files Browse the repository at this point in the history
Possibly the 'perl' in the PATH is not the one to be used for the tests;
let PERL set in the environment select it.

Signed-off-by: Sam Vilain <sam.vilain@catalyst.net.nz>
Acked-by: Eric Wong <normalperson@yhbt.net>
  • Loading branch information
Sam Vilain authored and Eric Wong committed Oct 27, 2009
1 parent cb74a0c commit a5e9c7d
Showing 1 changed file with 3 additions and 2 deletions.
5 changes: 3 additions & 2 deletions t/lib-git-svn.sh
Original file line number Diff line number Diff line change
Expand Up @@ -16,6 +16,7 @@ fi
GIT_DIR=$PWD/.git
GIT_SVN_DIR=$GIT_DIR/svn/refs/remotes/git-svn
SVN_TREE=$GIT_SVN_DIR/svn-tree
PERL=${PERL:-perl}

svn >/dev/null 2>&1
if test $? -ne 1
Expand All @@ -29,7 +30,7 @@ export svnrepo
svnconf=$PWD/svnconf
export svnconf

perl -w -e "
$PERL -w -e "
use SVN::Core;
use SVN::Repos;
\$SVN::Core::VERSION gt '1.1.0' or exit(42);
Expand Down Expand Up @@ -130,7 +131,7 @@ stop_httpd () {
}

convert_to_rev_db () {
perl -w -- - "$@" <<\EOF
$PERL -w -- - "$@" <<\EOF
use strict;
@ARGV == 2 or die "Usage: convert_to_rev_db <input> <output>";
open my $wr, '+>', $ARGV[1] or die "$!: couldn't open: $ARGV[1]";
Expand Down

0 comments on commit a5e9c7d

Please sign in to comment.