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 /dist/Thread-Semaphore | |
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 'dist/Thread-Semaphore')
-rw-r--r-- | dist/Thread-Semaphore/t/01_basic.t | 2 | ||||
-rw-r--r-- | dist/Thread-Semaphore/t/04_nonblocking.t | 2 | ||||
-rw-r--r-- | dist/Thread-Semaphore/t/05_force.t | 2 |
3 files changed, 3 insertions, 3 deletions
diff --git a/dist/Thread-Semaphore/t/01_basic.t b/dist/Thread-Semaphore/t/01_basic.t index 1e9d110680..cfdadb9047 100644 --- a/dist/Thread-Semaphore/t/01_basic.t +++ b/dist/Thread-Semaphore/t/01_basic.t @@ -14,7 +14,7 @@ use threads::shared; use Thread::Semaphore; if ($] == 5.008) { - require 't/test.pl'; # Test::More work-alike for Perl 5.8.0 + require './t/test.pl'; # Test::More work-alike for Perl 5.8.0 } else { require Test::More; } diff --git a/dist/Thread-Semaphore/t/04_nonblocking.t b/dist/Thread-Semaphore/t/04_nonblocking.t index d1538e8115..bef964eaf0 100644 --- a/dist/Thread-Semaphore/t/04_nonblocking.t +++ b/dist/Thread-Semaphore/t/04_nonblocking.t @@ -14,7 +14,7 @@ use threads::shared; use Thread::Semaphore; if ($] == 5.008) { - require 't/test.pl'; # Test::More work-alike for Perl 5.8.0 + require './t/test.pl'; # Test::More work-alike for Perl 5.8.0 } else { require Test::More; } diff --git a/dist/Thread-Semaphore/t/05_force.t b/dist/Thread-Semaphore/t/05_force.t index ca888d816b..ee7090b645 100644 --- a/dist/Thread-Semaphore/t/05_force.t +++ b/dist/Thread-Semaphore/t/05_force.t @@ -14,7 +14,7 @@ use threads::shared; use Thread::Semaphore; if ($] == 5.008) { - require 't/test.pl'; # Test::More work-alike for Perl 5.8.0 + require './t/test.pl'; # Test::More work-alike for Perl 5.8.0 } else { require Test::More; } |