diff options
Diffstat (limited to 'ext/Test/Harness/t/multiplexer.t')
| -rw-r--r-- | ext/Test/Harness/t/multiplexer.t | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/ext/Test/Harness/t/multiplexer.t b/ext/Test/Harness/t/multiplexer.t index dd988dcee1..eccbb0ee16 100644 --- a/ext/Test/Harness/t/multiplexer.t +++ b/ext/Test/Harness/t/multiplexer.t @@ -56,8 +56,8 @@ my @schedule = ( return [ TAP::Parser->new( { source => File::Spec->catfile( - ( $ENV{PERL_CORE} ? 'lib' : 't' ), 'sample-tests', - 'simple' + ( $ENV{PERL_CORE} ? ( File::Spec->updir(), 'ext', 'Test', 'Harness' ) : () ), + 't', 'sample-tests', 'simple' ), } ), @@ -76,8 +76,8 @@ my @schedule = ( return map { [ TAP::Parser->new( { source => File::Spec->catfile( - ( $ENV{PERL_CORE} ? 'lib' : 't' ), - 'sample-tests', 'simple' + ( $ENV{PERL_CORE} ? ( File::Spec->updir(), 'ext', 'Test', 'Harness' ) : () ), + 't', 'sample-tests', 'simple' ), } ), @@ -116,8 +116,8 @@ my @schedule = ( ( map { [ TAP::Parser->new( { source => File::Spec->catfile( - ( $ENV{PERL_CORE} ? 'lib' : 't' ), - 'sample-tests', 'simple' + ( $ENV{PERL_CORE} ? ( File::Spec->updir(), 'ext', 'Test', 'Harness' ) : () ), + 't', 'sample-tests', 'simple' ), } ), |