Move t/lib/{data,sample-tests,source_tests,subclass_tests} into
Nicholas Clark [Tue, 26 Aug 2008 10:51:53 +0000 (10:51 +0000)]
ext/Test/Harness/t/{data,sample-tests,source_tests,subclass_tests}
(The same path as in the Test-Harness distribution.)

p4raw-id: //depot/perl@34227

82 files changed:
MANIFEST
Porting/Maintainers.pl
ext/Test/Harness/t/compat/failure.t
ext/Test/Harness/t/compat/inc_taint.t
ext/Test/Harness/t/data/catme.1 [moved from t/lib/data/catme.1 with 100% similarity]
ext/Test/Harness/t/data/proverc [moved from t/lib/data/proverc with 100% similarity]
ext/Test/Harness/t/data/sample.yml [moved from t/lib/data/sample.yml with 100% similarity]
ext/Test/Harness/t/harness.t
ext/Test/Harness/t/iterators.t
ext/Test/Harness/t/multiplexer.t
ext/Test/Harness/t/nofork.t
ext/Test/Harness/t/parse.t
ext/Test/Harness/t/parser-config.t
ext/Test/Harness/t/parser-subclass.t
ext/Test/Harness/t/process.t
ext/Test/Harness/t/proverc.t
ext/Test/Harness/t/proverun.t
ext/Test/Harness/t/regression.t
ext/Test/Harness/t/sample-tests/bailout [moved from t/lib/sample-tests/bailout with 100% similarity]
ext/Test/Harness/t/sample-tests/bignum [moved from t/lib/sample-tests/bignum with 100% similarity]
ext/Test/Harness/t/sample-tests/bignum_many [moved from t/lib/sample-tests/bignum_many with 100% similarity]
ext/Test/Harness/t/sample-tests/combined [moved from t/lib/sample-tests/combined with 100% similarity]
ext/Test/Harness/t/sample-tests/combined_compat [moved from t/lib/sample-tests/combined_compat with 100% similarity]
ext/Test/Harness/t/sample-tests/delayed [moved from t/lib/sample-tests/delayed with 100% similarity]
ext/Test/Harness/t/sample-tests/descriptive [moved from t/lib/sample-tests/descriptive with 100% similarity]
ext/Test/Harness/t/sample-tests/descriptive_trailing [moved from t/lib/sample-tests/descriptive_trailing with 100% similarity]
ext/Test/Harness/t/sample-tests/die [moved from t/lib/sample-tests/die with 100% similarity]
ext/Test/Harness/t/sample-tests/die_head_end [moved from t/lib/sample-tests/die_head_end with 100% similarity]
ext/Test/Harness/t/sample-tests/die_last_minute [moved from t/lib/sample-tests/die_last_minute with 100% similarity]
ext/Test/Harness/t/sample-tests/die_unfinished [moved from t/lib/sample-tests/die_unfinished with 100% similarity]
ext/Test/Harness/t/sample-tests/duplicates [moved from t/lib/sample-tests/duplicates with 100% similarity]
ext/Test/Harness/t/sample-tests/echo [moved from t/lib/sample-tests/echo with 100% similarity]
ext/Test/Harness/t/sample-tests/empty [moved from t/lib/sample-tests/empty with 100% similarity]
ext/Test/Harness/t/sample-tests/escape_eol [moved from t/lib/sample-tests/escape_eol with 100% similarity]
ext/Test/Harness/t/sample-tests/escape_hash [moved from t/lib/sample-tests/escape_hash with 100% similarity]
ext/Test/Harness/t/sample-tests/head_end [moved from t/lib/sample-tests/head_end with 100% similarity]
ext/Test/Harness/t/sample-tests/head_fail [moved from t/lib/sample-tests/head_fail with 100% similarity]
ext/Test/Harness/t/sample-tests/inc_taint [moved from t/lib/sample-tests/inc_taint with 100% similarity]
ext/Test/Harness/t/sample-tests/junk_before_plan [moved from t/lib/sample-tests/junk_before_plan with 100% similarity]
ext/Test/Harness/t/sample-tests/lone_not_bug [moved from t/lib/sample-tests/lone_not_bug with 100% similarity]
ext/Test/Harness/t/sample-tests/no_nums [moved from t/lib/sample-tests/no_nums with 100% similarity]
ext/Test/Harness/t/sample-tests/no_output [moved from t/lib/sample-tests/no_output with 100% similarity]
ext/Test/Harness/t/sample-tests/out_err_mix [moved from t/lib/sample-tests/out_err_mix with 100% similarity]
ext/Test/Harness/t/sample-tests/out_of_order [moved from t/lib/sample-tests/out_of_order with 100% similarity]
ext/Test/Harness/t/sample-tests/schwern [moved from t/lib/sample-tests/schwern with 100% similarity]
ext/Test/Harness/t/sample-tests/schwern-todo-quiet [moved from t/lib/sample-tests/schwern-todo-quiet with 100% similarity]
ext/Test/Harness/t/sample-tests/segfault [moved from t/lib/sample-tests/segfault with 100% similarity]
ext/Test/Harness/t/sample-tests/sequence_misparse [moved from t/lib/sample-tests/sequence_misparse with 100% similarity]
ext/Test/Harness/t/sample-tests/shbang_misparse [moved from t/lib/sample-tests/shbang_misparse with 100% similarity]
ext/Test/Harness/t/sample-tests/simple [moved from t/lib/sample-tests/simple with 100% similarity]
ext/Test/Harness/t/sample-tests/simple_fail [moved from t/lib/sample-tests/simple_fail with 100% similarity]
ext/Test/Harness/t/sample-tests/simple_yaml [moved from t/lib/sample-tests/simple_yaml with 100% similarity]
ext/Test/Harness/t/sample-tests/skip [moved from t/lib/sample-tests/skip with 100% similarity]
ext/Test/Harness/t/sample-tests/skip_nomsg [moved from t/lib/sample-tests/skip_nomsg with 100% similarity]
ext/Test/Harness/t/sample-tests/skipall [moved from t/lib/sample-tests/skipall with 100% similarity]
ext/Test/Harness/t/sample-tests/skipall_nomsg [moved from t/lib/sample-tests/skipall_nomsg with 100% similarity]
ext/Test/Harness/t/sample-tests/skipall_v13 [moved from t/lib/sample-tests/skipall_v13 with 100% similarity]
ext/Test/Harness/t/sample-tests/space_after_plan [moved from t/lib/sample-tests/space_after_plan with 100% similarity]
ext/Test/Harness/t/sample-tests/stdout_stderr [moved from t/lib/sample-tests/stdout_stderr with 100% similarity]
ext/Test/Harness/t/sample-tests/strict [moved from t/lib/sample-tests/strict with 100% similarity]
ext/Test/Harness/t/sample-tests/switches [moved from t/lib/sample-tests/switches with 100% similarity]
ext/Test/Harness/t/sample-tests/taint [moved from t/lib/sample-tests/taint with 100% similarity]
ext/Test/Harness/t/sample-tests/taint_warn [moved from t/lib/sample-tests/taint_warn with 100% similarity]
ext/Test/Harness/t/sample-tests/todo [moved from t/lib/sample-tests/todo with 100% similarity]
ext/Test/Harness/t/sample-tests/todo_inline [moved from t/lib/sample-tests/todo_inline with 100% similarity]
ext/Test/Harness/t/sample-tests/todo_misparse [moved from t/lib/sample-tests/todo_misparse with 100% similarity]
ext/Test/Harness/t/sample-tests/too_many [moved from t/lib/sample-tests/too_many with 100% similarity]
ext/Test/Harness/t/sample-tests/version_good [moved from t/lib/sample-tests/version_good with 100% similarity]
ext/Test/Harness/t/sample-tests/version_late [moved from t/lib/sample-tests/version_late with 100% similarity]
ext/Test/Harness/t/sample-tests/version_old [moved from t/lib/sample-tests/version_old with 100% similarity]
ext/Test/Harness/t/sample-tests/vms_nit [moved from t/lib/sample-tests/vms_nit with 100% similarity]
ext/Test/Harness/t/sample-tests/with_comments [moved from t/lib/sample-tests/with_comments with 100% similarity]
ext/Test/Harness/t/source.t
ext/Test/Harness/t/source_tests/harness [moved from t/lib/source_tests/harness with 100% similarity]
ext/Test/Harness/t/source_tests/harness_badtap [moved from t/lib/source_tests/harness_badtap with 100% similarity]
ext/Test/Harness/t/source_tests/harness_complain [moved from t/lib/source_tests/harness_complain with 100% similarity]
ext/Test/Harness/t/source_tests/harness_directives [moved from t/lib/source_tests/harness_directives with 100% similarity]
ext/Test/Harness/t/source_tests/harness_failure [moved from t/lib/source_tests/harness_failure with 100% similarity]
ext/Test/Harness/t/source_tests/source [moved from t/lib/source_tests/source with 100% similarity]
ext/Test/Harness/t/subclass_tests/non_perl_source [moved from t/lib/subclass_tests/non_perl_source with 100% similarity]
ext/Test/Harness/t/subclass_tests/perl_source [moved from t/lib/subclass_tests/perl_source with 100% similarity]
ext/Test/Harness/t/testargs.t

index 12a6474..8b59e69 100644 (file)
--- a/MANIFEST
+++ b/MANIFEST
@@ -1175,6 +1175,9 @@ ext/Test/Harness/t/compat/regression.t                    Test::Harness test
 ext/Test/Harness/t/compat/test-harness-compat.t                Test::Harness test
 ext/Test/Harness/t/compat/version.t                    Test::Harness test
 ext/Test/Harness/t/console.t                           Test::Harness test
+ext/Test/Harness/t/data/catme.1                                Test data for Test::Harness
+ext/Test/Harness/t/data/proverc                                Test data for Test::Harness
+ext/Test/Harness/t/data/sample.yml                     Test data for Test::Harness
 ext/Test/Harness/t/errors.t                            Test::Harness test
 ext/Test/Harness/t/grammar.t                           Test::Harness test
 ext/Test/Harness/t/harness.t                           Test::Harness test
@@ -1194,11 +1197,73 @@ ext/Test/Harness/t/proverun.t                           Test::Harness test
 ext/Test/Harness/t/prove.t                             Test::Harness test
 ext/Test/Harness/t/regression.t                                Test::Harness test
 ext/Test/Harness/t/results.t                           Test::Harness test
+ext/Test/Harness/t/sample-tests/bailout                        Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/bignum                 Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/bignum_many            Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/combined               Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/combined_compat                Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/delayed                        Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/descriptive            Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/descriptive_trailing   Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/die                    Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/die_head_end           Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/die_last_minute                Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/die_unfinished         Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/duplicates             Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/echo                   Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/empty                  Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/escape_eol             Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/escape_hash            Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/head_end               Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/head_fail              Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/inc_taint              Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/junk_before_plan       Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/lone_not_bug           Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/no_nums                        Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/no_output              Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/out_err_mix            Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/out_of_order           Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/schwern                        Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/schwern-todo-quiet     Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/segfault               Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/sequence_misparse      Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/shbang_misparse                Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/simple                 Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/simple_fail            Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/simple_yaml            Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/skip                   Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/skipall                        Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/skipall_nomsg          Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/skipall_v13            Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/skip_nomsg             Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/space_after_plan       Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/stdout_stderr          Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/strict                 Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/switches               Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/taint                  Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/taint_warn             Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/todo                   Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/todo_inline            Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/todo_misparse          Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/too_many               Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/version_good           Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/version_late           Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/version_old            Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/vms_nit                        Test data for Test::Harness
+ext/Test/Harness/t/sample-tests/with_comments          Test data for Test::Harness
 ext/Test/Harness/t/scheduler.t                         Test::Harness test
 ext/Test/Harness/t/source.t                            Test::Harness test
+ext/Test/Harness/t/source_tests/harness                        Test data for Test::Harness
+ext/Test/Harness/t/source_tests/harness_badtap         Test data for Test::Harness
+ext/Test/Harness/t/source_tests/harness_complain       Test data for Test::Harness
+ext/Test/Harness/t/source_tests/harness_directives     Test data for Test::Harness
+ext/Test/Harness/t/source_tests/harness_failure                Test data for Test::Harness
+ext/Test/Harness/t/source_tests/source                 Test data for Test::Harness
 ext/Test/Harness/t/spool.t                             Test::Harness test
 ext/Test/Harness/t/state.t                             Test::Harness test
 ext/Test/Harness/t/streams.t                           Test::Harness test
+ext/Test/Harness/t/subclass_tests/non_perl_source      Test data for Test::Harness
+ext/Test/Harness/t/subclass_tests/perl_source          Test data for Test::Harness
 ext/Test/Harness/t/taint.t                             Test::Harness test
 ext/Test/Harness/t/testargs.t                          Test::Harness test
 ext/Test/Harness/t/unicode.t                           Test::Harness test
@@ -3599,9 +3664,6 @@ t/lib/compress/truncate.pl        Compress::Zlib
 t/lib/compress/zlib-generic.pl Compress::Zlib
 t/lib/contains_pod.xr          Pod-Parser test file
 t/lib/cygwin.t                 Builtin cygwin function tests
-t/lib/data/catme.1                     Test data for Test::Harness
-t/lib/data/proverc                     Test data for Test::Harness
-t/lib/data/sample.yml                  Test data for Test::Harness
 t/lib/Devel/switchd.pm         Module for t/run/switchd.t
 t/lib/Dev/Null.pm              Module for testing Test::Harness
 t/lib/dprof/test1_t            Perl code profiler tests
@@ -3662,72 +3724,10 @@ t/lib/MySource.pm               Module for testing Test::Harness
 t/lib/NoFork.pm                        Module for testing Test::Harness
 t/lib/no_load.t                        Test that some modules don't load others
 t/lib/proxy_constant_subs.t    Test that Proxy Constant Subs behave correctly
-t/lib/sample-tests/bailout             Test data for Test::Harness
-t/lib/sample-tests/bignum              Test data for Test::Harness
-t/lib/sample-tests/bignum_many         Test data for Test::Harness
-t/lib/sample-tests/combined            Test data for Test::Harness
-t/lib/sample-tests/combined_compat     Test data for Test::Harness
-t/lib/sample-tests/delayed             Test data for Test::Harness
-t/lib/sample-tests/descriptive         Test data for Test::Harness
-t/lib/sample-tests/descriptive_trailing        Test data for Test::Harness
-t/lib/sample-tests/die                 Test data for Test::Harness
-t/lib/sample-tests/die_head_end                Test data for Test::Harness
-t/lib/sample-tests/die_last_minute     Test data for Test::Harness
-t/lib/sample-tests/die_unfinished      Test data for Test::Harness
-t/lib/sample-tests/duplicates          Test data for Test::Harness
-t/lib/sample-tests/echo                        Test data for Test::Harness
-t/lib/sample-tests/empty               Test data for Test::Harness
-t/lib/sample-tests/escape_eol          Test data for Test::Harness
-t/lib/sample-tests/escape_hash         Test data for Test::Harness
-t/lib/sample-tests/head_end            Test data for Test::Harness
-t/lib/sample-tests/head_fail           Test data for Test::Harness
-t/lib/sample-tests/inc_taint           Test data for Test::Harness
-t/lib/sample-tests/junk_before_plan    Test data for Test::Harness
-t/lib/sample-tests/lone_not_bug                Test data for Test::Harness
-t/lib/sample-tests/no_nums             Test data for Test::Harness
-t/lib/sample-tests/no_output           Test data for Test::Harness
-t/lib/sample-tests/out_err_mix         Test data for Test::Harness
-t/lib/sample-tests/out_of_order                Test data for Test::Harness
-t/lib/sample-tests/schwern             Test data for Test::Harness
-t/lib/sample-tests/schwern-todo-quiet  Test data for Test::Harness
-t/lib/sample-tests/segfault            Test data for Test::Harness
-t/lib/sample-tests/sequence_misparse   Test data for Test::Harness
-t/lib/sample-tests/shbang_misparse     Test data for Test::Harness
-t/lib/sample-tests/simple              Test data for Test::Harness
-t/lib/sample-tests/simple_fail         Test data for Test::Harness
-t/lib/sample-tests/simple_yaml         Test data for Test::Harness
-t/lib/sample-tests/skip                        Test data for Test::Harness
-t/lib/sample-tests/skipall             Test data for Test::Harness
-t/lib/sample-tests/skipall_nomsg       Test data for Test::Harness
-t/lib/sample-tests/skipall_v13         Test data for Test::Harness
-t/lib/sample-tests/skip_nomsg          Test data for Test::Harness
-t/lib/sample-tests/space_after_plan    Test data for Test::Harness
-t/lib/sample-tests/stdout_stderr       Test data for Test::Harness
-t/lib/sample-tests/strict              Test data for Test::Harness
-t/lib/sample-tests/switches            Test data for Test::Harness
-t/lib/sample-tests/taint               Test data for Test::Harness
-t/lib/sample-tests/taint_warn          Test data for Test::Harness
-t/lib/sample-tests/todo                        Test data for Test::Harness
-t/lib/sample-tests/todo_inline         Test data for Test::Harness
-t/lib/sample-tests/todo_misparse       Test data for Test::Harness
-t/lib/sample-tests/too_many            Test data for Test::Harness
-t/lib/sample-tests/version_good                Test data for Test::Harness
-t/lib/sample-tests/version_late                Test data for Test::Harness
-t/lib/sample-tests/version_old         Test data for Test::Harness
-t/lib/sample-tests/vms_nit             Test data for Test::Harness
-t/lib/sample-tests/with_comments       Test data for Test::Harness
 t/lib/Sans_mypragma.pm                 Test module for t/lib/mypragma.t
-t/lib/source_tests/harness             Test data for Test::Harness
-t/lib/source_tests/harness_badtap      Test data for Test::Harness
-t/lib/source_tests/harness_complain    Test data for Test::Harness
-t/lib/source_tests/harness_directives  Test data for Test::Harness
-t/lib/source_tests/harness_failure     Test data for Test::Harness
-t/lib/source_tests/source              Test data for Test::Harness
 t/lib/strict/refs              Tests of "use strict 'refs'" for strict.t
 t/lib/strict/subs              Tests of "use strict 'subs'" for strict.t
 t/lib/strict/vars              Tests of "use strict 'vars'" for strict.t
-t/lib/subclass_tests/non_perl_source   Test data for Test::Harness
-t/lib/subclass_tests/perl_source       Test data for Test::Harness
 t/lib/TAP/Parser/SubclassTest.pm       Module for testing Test::Harness
 t/lib/Test/Simple/Catch.pm     Utility module for testing Test::Simple
 t/lib/Test/Simple/sample_tests/death_in_eval.plx       for exit.t
index db9c23e..5a7fbe0 100644 (file)
@@ -871,9 +871,7 @@ package Maintainers;
        'Test::Harness' =>
                {
                'MAINTAINER'    => 'andya',
-               'FILES'         => q[ext/Test/Harness
-                                    t/lib/data t/lib/sample-tests 
-                                    t/lib/source_tests t/lib/Dev/Null.pm
+               'FILES'         => q[ext/Test/Harness t/lib/Dev/Null.pm
                                     t/lib/App/Prove/Plugin/Dummy.pm
                                     t/lib/IO/c55Capture.pm t/lib/NoFork.pm],
                'CPAN'          => 1,
index c1b902b..b164f9b 100644 (file)
@@ -19,11 +19,14 @@ use Test::Harness;
         return sub { $died = 1 }
     }
 
-    my $curdir = File::Spec->curdir;
-    my $sample_tests
-      = $ENV{PERL_CORE}
-      ? File::Spec->catdir( $curdir, 'lib', 'sample-tests' )
-      : File::Spec->catdir( $curdir, 't',   'sample-tests' );
+    my $sample_tests;
+    if ($ENV{PERL_CORE}) {
+       my $updir = File::Spec->updir;
+       $sample_tests = File::Spec->catdir( $updir, 'ext', 'Test', 'Harness', 't', 'sample-tests' );
+    } else {
+       my $curdir = File::Spec->curdir;
+       $sample_tests = File::Spec->catdir( $curdir, 't', 'sample-tests' );
+    }
 
     {
         local $SIG{__DIE__} = prepare_for_death();
index 06a8e23..bdb0d73 100644 (file)
@@ -35,7 +35,7 @@ sub _all_ok {
     my ( $tot, $failed ) = Test::Harness::execute_tests(
         tests => [
             $ENV{PERL_CORE}
-            ? 'lib/sample-tests/inc_taint'
+            ? '../ext/Test/Harness/t/sample-tests/inc_taint'
             : 't/sample-tests/inc_taint'
         ]
     );
index 70ff42e..716ea59 100644 (file)
@@ -19,8 +19,8 @@ use TAP::Harness;
 
 my $HARNESS = 'TAP::Harness';
 
-my $source_tests = $ENV{PERL_CORE} ? 'lib/source_tests' : 't/source_tests';
-my $sample_tests = $ENV{PERL_CORE} ? 'lib/sample-tests' : 't/sample-tests';
+my $source_tests = $ENV{PERL_CORE} ? '../ext/Test/Harness/t/source_tests' : 't/source_tests';
+my $sample_tests = $ENV{PERL_CORE} ? '../ext/Test/Harness/t/sample-tests' : 't/sample-tests';
 
 plan tests => 113;
 
@@ -523,7 +523,7 @@ SKIP: {
     eval {
         _runtests(
             $harness,
-            $ENV{PERL_CORE} ? 'lib/data/catme.1' : 't/data/catme.1'
+            $ENV{PERL_CORE} ? '../ext/Test/Harness/t/data/catme.1' : 't/data/catme.1'
         );
     };
 
@@ -810,7 +810,7 @@ sub _runtests {
 
     # coverage tests for the basically untested T::H::_open_spool
 
-    my @spool = ( $ENV{PERL_CORE} ? ('spool') : ( 't', 'spool' ) );
+    my @spool = ( ( $ENV{PERL_CORE} ? (File::Spec->updir(), 'ext', 'Test', 'Harness' ) : () ), ( 't', 'spool' ) );
     $ENV{PERL_TEST_HARNESS_DUMP_TAP} = File::Spec->catfile(@spool);
 
 # now given that we're going to be writing stuff to the file system, make sure we have
index 11b2899..e4df510 100644 (file)
@@ -42,8 +42,8 @@ my @schedule = (
             command => [
                 $^X,
                 File::Spec->catfile(
-                    ( $ENV{PERL_CORE} ? 'lib' : 't' ),
-                    'sample-tests', 'out_err_mix'
+                    ( $ENV{PERL_CORE} ? ( File::Spec->updir(), 'ext', 'Test', 'Harness' ) : () ),
+                    't', 'sample-tests', 'out_err_mix'
                 )
             ],
             merge    => 1,
index dd988dc..eccbb0e 100644 (file)
@@ -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'
                                 ),
                             }
                         ),
index 6a45e50..7f27820 100755 (executable)
@@ -58,7 +58,7 @@ my $mod = 'TAP::Parser::Iterator::Process';
         }
     );
     $harness->runtests(
-        ( $ENV{PERL_CORE} ? 'lib' : 't' ) . '/sample-tests/simple' );
+        ( $ENV{PERL_CORE} ? '../ext/Test/Harness/' : '' ) . 't/sample-tests/simple' );
     my @output = tied($$capture)->dump;
     is pop @output, "Result: PASS\n", 'status OK';
     pop @output;    # get rid of summary line
index 7118199..39f2c38 100755 (executable)
@@ -605,8 +605,8 @@ END_TAP
 
     my $parser = 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'
             ),
         }
     );
index cf0a246..0c74427 100644 (file)
@@ -14,7 +14,7 @@ use strict;
 use vars qw(%INIT %CUSTOM);
 
 use Test::More tests => 11;
-use File::Spec::Functions qw( catfile );
+use File::Spec::Functions qw( catfile updir );
 use TAP::Parser;
 
 use_ok('MySource');
@@ -23,8 +23,8 @@ use_ok('MyGrammar');
 use_ok('MyIteratorFactory');
 use_ok('MyResultFactory');
 
-my $t_dir = $ENV{PERL_CORE} ? 'lib' : 't';
-my $source = catfile( $t_dir, 'source_tests', 'source' );
+my @t_path = $ENV{PERL_CORE} ? ( updir(), 'ext', 'Test', 'Harness' ) : ();
+my $source = catfile( @t_path, 't', 'source_tests', 'source' );
 my %customize = (
     source_class           => 'MySource',
     perl_source_class      => 'MyPerlSource',
index f522f89..2817751 100644 (file)
@@ -14,16 +14,16 @@ use strict;
 use vars qw(%INIT %CUSTOM);
 
 use Test::More tests => 24;
-use File::Spec::Functions qw( catfile );
+use File::Spec::Functions qw( catfile updir );
 
 use_ok('TAP::Parser::SubclassTest');
 
 # TODO: foreach my $source ( ... )
-my $t_dir = $ENV{PERL_CORE} ? 'lib' : 't';
+my @t_path = $ENV{PERL_CORE} ? ( updir(), 'ext', 'Test', 'Harness' ) : ();
 
 {    # perl source
     %INIT = %CUSTOM = ();
-    my $source = catfile( $t_dir, 'subclass_tests', 'perl_source' );
+    my $source = catfile( @t_path, 't', 'subclass_tests', 'perl_source' );
     my $p = TAP::Parser::SubclassTest->new( { source => $source } );
 
     # The grammar is lazily constructed so we need to ask for it to
@@ -78,7 +78,7 @@ SKIP: {    # non-perl source
     unless ( -e $cat ) {
         skip "no '$cat'", 4;
     }
-    my $file = catfile( $t_dir, 'data', 'catme.1' );
+    my $file = catfile( @t_path, 't', 'data', 'catme.1' );
     my $p = TAP::Parser::SubclassTest->new( { exec => [ $cat => $file ] } );
 
     is( $INIT{MySource},     1, 'initialized MySource subclass' );
index 5adddc9..abebf69 100644 (file)
@@ -28,8 +28,8 @@ my @expect = (
 );
 
 my $source = File::Spec->catfile(
-    ( $ENV{PERL_CORE} ? 'lib' : 't' ),
-    'sample-tests', 'delayed'
+    ( $ENV{PERL_CORE} ? ( File::Spec->updir(), 'ext', 'Test', 'Harness' ) : () ),
+    't', 'sample-tests', 'delayed'
 );
 
 for my $chunk_size ( 1, 4, 65536 ) {
index 2577250..df4cbbb 100644 (file)
@@ -20,7 +20,7 @@ my $prove = App::Prove->new;
 
 $prove->add_rc_file(
     File::Spec->catfile(
-        ( $ENV{PERL_CORE} ? 'lib' : 't' ), 'data', 'proverc'
+        ( $ENV{PERL_CORE} ? ( File::Spec->updir(), 'ext', 'Test', 'Harness' ) : () ), 't', 'data', 'proverc'
     )
 );
 
index b40d563..7db0197 100644 (file)
@@ -20,8 +20,8 @@ my @SCHEDULE;
 BEGIN {
 
     my $sample_test = File::Spec->catfile(
-        split /\//,
-        ( $ENV{PERL_CORE} ? 'lib' : 't' ) . '/sample-tests/simple'
+        ( $ENV{PERL_CORE} ? ( File::Spec->updir(), 'ext', 'Test', 'Harness' ) : () ), 
+        't', 'sample-tests', 'simple'
     );
 
     @SCHEDULE = (
index c029a05..8f93e4e 100644 (file)
@@ -30,8 +30,8 @@ my $IsWin32 = $^O eq 'MSWin32';
 
 my $SAMPLE_TESTS = File::Spec->catdir(
     File::Spec->curdir,
-    ( $ENV{PERL_CORE} ? 'lib' : 't' ),
-    'sample-tests'
+    ( $ENV{PERL_CORE} ? ( File::Spec->updir(), 'ext', 'Test', 'Harness' ) : () ),
+    't', 'sample-tests'
 );
 
 my %deprecated = map { $_ => 1 } qw(
index 8f7e60f..a6441a5 100644 (file)
@@ -22,8 +22,8 @@ use TAP::Parser::Source::Perl;
 
 my $parser = EmptyParser->new;
 my $test   = File::Spec->catfile(
-    ( $ENV{PERL_CORE} ? 'lib' : 't' ), 'source_tests',
-    'source'
+    ( $ENV{PERL_CORE} ?  ( File::Spec->updir(), 'ext', 'Test', 'Harness' ) : () ),
+    't', 'source_tests', 'source'
 );
 
 my $perl = $^X;
index 9160c59..0c69f8a 100644 (file)
@@ -14,8 +14,8 @@ use TAP::Harness;
 use App::Prove;
 
 my $test = File::Spec->catfile(
-    ( $ENV{PERL_CORE} ? 'lib' : 't' ),
-    'sample-tests', 'echo'
+    ( $ENV{PERL_CORE} ? ( File::Spec->updir(), 'ext', 'Test', 'Harness' ) : () ),
+    't', 'sample-tests', 'echo'
 );
 
 diag( "\n\n", bigness( join ' ', @ARGV ), "\n\n" ) if @ARGV;