Merge branch 'jk/wrap-perl-used-in-tests'

* jk/wrap-perl-used-in-tests:
  t: use perl instead of "$PERL_PATH" where applicable
  t: provide a perl() function which uses $PERL_PATH
This commit is contained in:
Junio C Hamano
2013-11-04 14:58:01 -08:00
29 changed files with 62 additions and 54 deletions

View File

@ -76,11 +76,11 @@ test_decode_color () {
}
nul_to_q () {
"$PERL_PATH" -pe 'y/\000/Q/'
perl -pe 'y/\000/Q/'
}
q_to_nul () {
"$PERL_PATH" -pe 'y/Q/\000/'
perl -pe 'y/Q/\000/'
}
q_to_cr () {
@ -648,7 +648,7 @@ test_seq () {
2) ;;
*) error "bug in the test script: not 1 or 2 parameters to test_seq" ;;
esac
"$PERL_PATH" -le 'print for $ARGV[0]..$ARGV[1]' -- "$@"
perl -le 'print for $ARGV[0]..$ARGV[1]' -- "$@"
}
# This function can be used to schedule some commands to be run
@ -711,6 +711,10 @@ test_ln_s_add () {
fi
}
perl () {
command "$PERL_PATH" "$@"
}
# The following mingw_* functions obey POSIX shell syntax, but are actually
# bash scripts, and are meant to be used only with bash on Windows.