Tue Nov 22 15:29:34 2016: Request 118903 was acted upon.
Transaction: Ticket created by PLICEASE
Queue: PAR-Packer
Subject: Does not install when '.' is not in @INC
Broken in: (no value)
Severity: (no value)
Owner: Nobody
Requestors: [email protected]
Status: new
Ticket <URL: https://rt.cpan.org/Ticket/Display.html?id=118903 >
5.25.7 can be built without '.' in @INC by default. With this configuration
the test t/20-pp.t fails:
twin% prove -bv t/20-pp.t
t/20-pp.t .. No subtests run
Test Summary Report
-------------------
t/20-pp.t (Wstat: 0 Tests: 0 Failed: 0)
Parse errors: No plan found in TAP output
Files=1, Tests=0, 0 wallclock secs ( 0.01 usr 0.01 sys + 0.10 cusr 0.00
csys = 0.12 CPU)
Result: FAIL
I am attaching a patch that fixes the problem for me.
commit ec849298e9e4659d68b8d51b005ae2ab7362231c
Author: Graham Ollis <[email protected]>
Date: Tue Nov 22 15:30:50 2016 -0500
handle . not being in @INC by default
diff --git a/contrib/automated_pp_test/automated_pp_test.pl b/contrib/automated_pp_test/automated_pp_test.pl
index b28a5d8..9c694b9 100644
--- a/contrib/automated_pp_test/automated_pp_test.pl
+++ b/contrib/automated_pp_test/automated_pp_test.pl
@@ -76,6 +76,7 @@ use strict;
########################################################################
# Home grown perl modules go here
+use lib '.';
use prior_to_test;
use pipe_a_command;
use test_in_further_subdir;
diff --git a/t/20-pp.t b/t/20-pp.t
index 30d482f..7e316f0 100644
--- a/t/20-pp.t
+++ b/t/20-pp.t
@@ -81,7 +81,7 @@ chdir $test_dir;
"--par_location" => File::Spec->catfile($cwd, qw(blib script par.pl)),
(defined($ENV{TEST_VERBOSE}) && $ENV{TEST_VERBOSE} > 1) ? ("--verbose") : ()
);
- do "automated_pp_test.pl";
+ do "./automated_pp_test.pl";
}
sub can_run {
