Skip to content

Commit 9c1506a

Browse files
committed
Merge branch 'pb/maint-use-custom-perl' into maint
* pb/maint-use-custom-perl: Make sure $PERL_PATH is defined when the test suite is run.
2 parents d1dfc01 + be38ca3 commit 9c1506a

File tree

4 files changed

+5
-4
lines changed

4 files changed

+5
-4
lines changed

Makefile

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1629,6 +1629,7 @@ GIT-CFLAGS: .FORCE-GIT-CFLAGS
16291629
# and the first level quoting from the shell that runs "echo".
16301630
GIT-BUILD-OPTIONS: .FORCE-GIT-BUILD-OPTIONS
16311631
@echo SHELL_PATH=\''$(subst ','\'',$(SHELL_PATH_SQ))'\' >$@
1632+
@echo PERL_PATH=\''$(subst ','\'',$(PERL_PATH_SQ))'\' >>$@
16321633
@echo TAR=\''$(subst ','\'',$(subst ','\'',$(TAR)))'\' >>$@
16331634
@echo NO_CURL=\''$(subst ','\'',$(subst ','\'',$(NO_CURL)))'\' >>$@
16341635
@echo NO_PERL=\''$(subst ','\'',$(subst ','\'',$(NO_PERL)))'\' >>$@

t/t9400-git-cvsserver-server.sh

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -20,7 +20,7 @@ then
2020
say 'skipping git-cvsserver tests, cvs not found'
2121
test_done
2222
fi
23-
perl -e 'use DBI; use DBD::SQLite' >/dev/null 2>&1 || {
23+
"$PERL_PATH" -e 'use DBI; use DBD::SQLite' >/dev/null 2>&1 || {
2424
say 'skipping git-cvsserver tests, Perl SQLite interface unavailable'
2525
test_done
2626
}

t/t9401-git-cvsserver-crlf.sh

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -57,7 +57,7 @@ then
5757
say 'skipping git-cvsserver tests, perl not available'
5858
test_done
5959
fi
60-
perl -e 'use DBI; use DBD::SQLite' >/dev/null 2>&1 || {
60+
"$PERL_PATH" -e 'use DBI; use DBD::SQLite' >/dev/null 2>&1 || {
6161
say 'skipping git-cvsserver tests, Perl SQLite interface unavailable'
6262
test_done
6363
}

t/t9700-perl-git.sh

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -11,7 +11,7 @@ if ! test_have_prereq PERL; then
1111
test_done
1212
fi
1313

14-
perl -MTest::More -e 0 2>/dev/null || {
14+
"$PERL_PATH" -MTest::More -e 0 2>/dev/null || {
1515
say "Perl Test::More unavailable, skipping test"
1616
test_done
1717
}
@@ -48,6 +48,6 @@ test_expect_success \
4848

4949
test_external_without_stderr \
5050
'Perl API' \
51-
perl "$TEST_DIRECTORY"/t9700/test.pl
51+
"$PERL_PATH" "$TEST_DIRECTORY"/t9700/test.pl
5252

5353
test_done

0 commit comments

Comments
 (0)