diff options
| author | H.Merijn Brand <h.m.brand@xs4all.nl> | 2016-10-22 13:55:48 +0200 |
|---|---|---|
| committer | H.Merijn Brand <h.m.brand@xs4all.nl> | 2016-11-11 16:27:20 +0100 |
| commit | 3d7c117d5246fe5390f3fda7bd31308799d54201 (patch) | |
| tree | 25ed91492a78660a701502955918ad1c0a5737bc /utils | |
| parent | 32db2dd39faf0a339c2c26769b98a1924ca09892 (diff) | |
| download | perl-3d7c117d5246fe5390f3fda7bd31308799d54201.tar.gz | |
Patch unit tests to explicitly insert "." into @INC when needed.
require calls now require ./ to be prepended to the file since . is no
longer guaranteed to be in @INC.
Diffstat (limited to 'utils')
| -rw-r--r-- | utils/Makefile.PL | 2 | ||||
| -rw-r--r-- | utils/c2ph.PL | 4 | ||||
| -rw-r--r-- | utils/perlivp.PL | 2 |
3 files changed, 4 insertions, 4 deletions
diff --git a/utils/Makefile.PL b/utils/Makefile.PL index 27c371f82a..85b0833960 100644 --- a/utils/Makefile.PL +++ b/utils/Makefile.PL @@ -13,7 +13,7 @@ if (@ARGV) { # attempting to move the work from them to the extension directories and # ExtUtils::MakeMaker. -require 'regen/regen_lib.pl'; +require './regen/regen_lib.pl'; my $target = 'utils/Makefile'; print "Extracting $target (with variable substitutions)\n"; diff --git a/utils/c2ph.PL b/utils/c2ph.PL index ea87a6f246..c5b5a3f95b 100644 --- a/utils/c2ph.PL +++ b/utils/c2ph.PL @@ -198,8 +198,8 @@ them in terms of packages and functions. Consider the following program: #!/usr/local/bin/perl require 'syscall.ph'; - require 'sys/time.ph'; - require 'sys/resource.ph'; + require './sys/time.ph'; + require './sys/resource.ph'; $ru = "\0" x &rusage'sizeof(); diff --git a/utils/perlivp.PL b/utils/perlivp.PL index e5229133f4..81f8ae428e 100644 --- a/utils/perlivp.PL +++ b/utils/perlivp.PL @@ -231,7 +231,7 @@ if (defined($Config{'extensions'})) { next if $_ eq 'XS/APItest'; next if $_ eq 'XS/Typemap'; # VMS$ perl -e "eval ""require \""Devel/DProf.pm\"";"" print $@" - # \NT> perl -e "eval \"require 'Devel/DProf.pm'\"; print $@" + # \NT> perl -e "eval \"require './Devel/DProf.pm'\"; print $@" # DProf: run perl with -d to use DProf. # Compilation failed in require at (eval 1) line 1. eval " require \"$_.pm\"; "; |