[Perl] Fix testsuite to work without . in @INC

"." was removed from @INC in Perl 5.26 for security reasons, and has
also been removed from older versions in some distros.

Fixes https://github.com/swig/swig/issues/997 reported by lfam.
This commit is contained in:
Olly Betts 2017-06-13 17:32:37 +12:00
commit 8855ef2b48
3 changed files with 8 additions and 2 deletions

View file

@ -282,7 +282,7 @@ perl5_static_cpp: $(SRCDIR_SRCS)
# -----------------------------------------------------------------
perl5_run:
$(RUNTOOL) $(PERL) $(PERL5_SCRIPT) $(RUNPIPE)
$(RUNTOOL) $(PERL) -I. $(PERL5_SCRIPT) $(RUNPIPE)
# -----------------------------------------------------------------
# Version display

View file

@ -7,7 +7,7 @@ use strict;
my $command = shift @ARGV;
my $output = `$^X $command 2>&1`;
my $output = `$^X -I. $command 2>&1`;
die "SWIG Perl test failed: \n\n$output\n"
if $?;