Skip Menu |
 

This queue is for tickets about the DBIx-SearchBuilder CPAN distribution.

Report information
The Basics
Id: 121140
Status: new
Priority: 0/
Queue: DBIx-SearchBuilder

People
Owner: Nobody in particular
Requestors: KENTNL [...] cpan.org
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: (no value)

Attachments
0001-Fix-for-.-removal-from-INC-in-Perl-5.26.patch



Subject: Makefile.PL fails when no '.' in @INC ( Can't locate inc/Module/Install.pm in @INC )
When no '.' is in @INC on Perl 5.25.11 or newer ( the default when installing by hand, or when PERL_USE_UNSAFE_INC=0 is set in ENV )
Makefile.PL fails as follows:

Configuring DBIx-SearchBuilder-1.67 ... Can't locate inc/Module/Install.pm in @INC (you may need to install the inc::Module::Install module) (@INC contains: /home/kent/perl5/perlbrew/perls/5.25.11-nossp-sip13-nopmc-nodot/lib/site_perl/5.25.11/x86_64-linux /home/kent/perl5/perlbrew/perls/5.25.11-nossp-sip13-nopmc-nodot/lib/site_perl/5.25.11 /home/kent/perl5/perlbrew/perls/5.25.11-nossp-sip13-nopmc-nodot/lib/5.25.11/x86_64-linux /home/kent/perl5/perlbrew/perls/5.25.11-nossp-sip13-nopmc-nodot/lib/5.25.11) at Makefile.PL line 1.
BEGIN failed--compilation aborted at Makefile.PL line 1.


-- 
- CPAN kentnl@cpan.org
- Gentoo Perl Maintainer kentnl@gentoo.org ( perl@gentoo.org )

See also: http://cpan.simcop2387.info/logs/DBIx::SearchBuilder_incfailure.log

-- 
- CPAN kentnl@cpan.org
- Gentoo Perl Maintainer kentnl@gentoo.org ( perl@gentoo.org )
Subject: 0001-Fix-for-.-removal-from-INC-in-Perl-5.26.patch
From 859d5403887df584af7e88e7bea7899ea6549fd0 Mon Sep 17 00:00:00 2001 From: Kent Fredric <kentfredric@gmail.com> Date: Sun, 25 Jun 2017 19:16:42 +1200 Subject: Fix for '.' removal from @INC in Perl 5.26 Bug: https://rt.cpan.org/Ticket/Display.html?id=121140 Bug: https://bugs.gentoo.org/615602 Bug: https://github.com/bestpractical/dbix-searchbuilder/pull/5 --- Makefile.PL | 1 + t/01basics.t | 2 +- t/01nocap_api.t | 2 +- t/01records.t | 2 +- t/01searches.t | 2 +- t/02distinct_values.t | 2 +- t/02null_order.t | 2 +- t/02order_outer.t | 2 +- t/02records_cachable.t | 2 +- t/02records_datetime.t | 2 +- t/02records_dt_interval.t | 2 +- t/02records_integers.t | 2 +- t/02records_object.t | 2 +- t/02searches_function.t | 2 +- t/02searches_joins.t | 2 +- t/03compatibility.t | 2 +- t/03cud_from_select.t | 2 +- t/03rebless.t | 2 +- t/03transactions.t | 2 +- t/03versions.t | 2 +- t/10schema.t | 4 ++-- t/11schema_records.t | 2 +- t/20set_edge_cases.t | 2 +- 23 files changed, 24 insertions(+), 23 deletions(-) diff --git a/Makefile.PL b/Makefile.PL index 49ec3f0..837f26f 100755 --- a/Makefile.PL +++ b/Makefile.PL @@ -1,3 +1,4 @@ +use lib '.'; use inc::Module::Install; name ('DBIx-SearchBuilder'); diff --git a/t/01basics.t b/t/01basics.t index a46ede6..f0c18df 100644 --- a/t/01basics.t +++ b/t/01basics.t @@ -3,7 +3,7 @@ use strict; use Test::More; -BEGIN { require "t/utils.pl" } +BEGIN { require "./t/utils.pl" } our (@AvailableDrivers); use constant TESTS_PER_DRIVER => 4; diff --git a/t/01nocap_api.t b/t/01nocap_api.t index 1ea417e..be45395 100644 --- a/t/01nocap_api.t +++ b/t/01nocap_api.t @@ -3,7 +3,7 @@ use strict; use Test::More; -BEGIN { require "t/utils.pl" } +BEGIN { require "./t/utils.pl" } use vars qw(@SPEC_METHODS @MODULES); my @SPEC_METHODS = qw(AUTOLOAD DESTROY CLONE); diff --git a/t/01records.t b/t/01records.t index a1f1366..d701e94 100644 --- a/t/01records.t +++ b/t/01records.t @@ -4,7 +4,7 @@ use strict; use warnings; use Test::More; -BEGIN { require "t/utils.pl" } +BEGIN { require "./t/utils.pl" } our (@AvailableDrivers); use constant TESTS_PER_DRIVER => 66; diff --git a/t/01searches.t b/t/01searches.t index 83a2001..1276544 100644 --- a/t/01searches.t +++ b/t/01searches.t @@ -4,7 +4,7 @@ use strict; use warnings; use Test::More; -BEGIN { require "t/utils.pl" } +BEGIN { require "./t/utils.pl" } our (@AvailableDrivers); use constant TESTS_PER_DRIVER => 150; diff --git a/t/02distinct_values.t b/t/02distinct_values.t index f20328d..826db21 100644 --- a/t/02distinct_values.t +++ b/t/02distinct_values.t @@ -4,7 +4,7 @@ use strict; use warnings; use Test::More; -BEGIN { require "t/utils.pl" } +BEGIN { require "./t/utils.pl" } our (@AvailableDrivers); use constant TESTS_PER_DRIVER => 9; diff --git a/t/02null_order.t b/t/02null_order.t index 9feda47..fab111d 100644 --- a/t/02null_order.t +++ b/t/02null_order.t @@ -4,7 +4,7 @@ use strict; use warnings; use Test::More; -BEGIN { require "t/utils.pl" } +BEGIN { require "./t/utils.pl" } our (@AvailableDrivers); use constant TESTS_PER_DRIVER => 11; diff --git a/t/02order_outer.t b/t/02order_outer.t index 08a236b..14a39fe 100644 --- a/t/02order_outer.t +++ b/t/02order_outer.t @@ -4,7 +4,7 @@ use strict; use warnings; use Test::More; -BEGIN { require "t/utils.pl" } +BEGIN { require "./t/utils.pl" } our (@AvailableDrivers); use constant TESTS_PER_DRIVER => 98; diff --git a/t/02records_cachable.t b/t/02records_cachable.t index cdbb9da..9418990 100644 --- a/t/02records_cachable.t +++ b/t/02records_cachable.t @@ -4,7 +4,7 @@ use strict; use warnings; use Test::More; -BEGIN { require "t/utils.pl" } +BEGIN { require "./t/utils.pl" } our (@AvailableDrivers); use constant TESTS_PER_DRIVER => 16; diff --git a/t/02records_datetime.t b/t/02records_datetime.t index f1a0d7a..6882729 100644 --- a/t/02records_datetime.t +++ b/t/02records_datetime.t @@ -5,7 +5,7 @@ BEGIN { $ENV{'TZ'} = 'Europe/Moscow' }; use strict; use warnings; use Test::More; -BEGIN { require "t/utils.pl" } +BEGIN { require "./t/utils.pl" } our (@AvailableDrivers); use constant TESTS_PER_DRIVER => 38; diff --git a/t/02records_dt_interval.t b/t/02records_dt_interval.t index ef1ead3..283746f 100644 --- a/t/02records_dt_interval.t +++ b/t/02records_dt_interval.t @@ -5,7 +5,7 @@ BEGIN { $ENV{'TZ'} = 'Europe/Moscow' }; use strict; use warnings; use Test::More; -BEGIN { require "t/utils.pl" } +BEGIN { require "./t/utils.pl" } our (@AvailableDrivers); use constant TESTS_PER_DRIVER => 17; diff --git a/t/02records_integers.t b/t/02records_integers.t index d13e2ee..95b8504 100644 --- a/t/02records_integers.t +++ b/t/02records_integers.t @@ -3,7 +3,7 @@ use strict; use warnings; use Test::More; -BEGIN { require "t/utils.pl" } +BEGIN { require "./t/utils.pl" } our (@AvailableDrivers); use constant TESTS_PER_DRIVER => 37; diff --git a/t/02records_object.t b/t/02records_object.t index 18c724e..34576db 100644 --- a/t/02records_object.t +++ b/t/02records_object.t @@ -5,7 +5,7 @@ use strict; use warnings; use Test::More; -BEGIN { require "t/utils.pl" } +BEGIN { require "./t/utils.pl" } our (@AvailableDrivers); use constant TESTS_PER_DRIVER => 11; diff --git a/t/02searches_function.t b/t/02searches_function.t index 2fd6e7e..c8682de 100644 --- a/t/02searches_function.t +++ b/t/02searches_function.t @@ -3,7 +3,7 @@ use strict; use Test::More; -BEGIN { require "t/utils.pl" } +BEGIN { require "./t/utils.pl" } our (@AvailableDrivers); use constant TESTS_PER_DRIVER => 18; diff --git a/t/02searches_joins.t b/t/02searches_joins.t index 1661f2b..cbdc3c9 100644 --- a/t/02searches_joins.t +++ b/t/02searches_joins.t @@ -3,7 +3,7 @@ use strict; use Test::More; -BEGIN { require "t/utils.pl" } +BEGIN { require "./t/utils.pl" } our (@AvailableDrivers); use constant TESTS_PER_DRIVER => 59; diff --git a/t/03compatibility.t b/t/03compatibility.t index 14eb382..3939503 100644 --- a/t/03compatibility.t +++ b/t/03compatibility.t @@ -4,7 +4,7 @@ use strict; use warnings; use Test::More; -BEGIN { require "t/utils.pl" } +BEGIN { require "./t/utils.pl" } our (@AvailableDrivers); use constant TESTS_PER_DRIVER => 2; diff --git a/t/03cud_from_select.t b/t/03cud_from_select.t index 7f5d21b..2f324b7 100644 --- a/t/03cud_from_select.t +++ b/t/03cud_from_select.t @@ -3,7 +3,7 @@ use strict; use Test::More; -BEGIN { require "t/utils.pl" } +BEGIN { require "./t/utils.pl" } our (@AvailableDrivers); use constant TESTS_PER_DRIVER => 14; diff --git a/t/03rebless.t b/t/03rebless.t index 888bb94..467cf00 100644 --- a/t/03rebless.t +++ b/t/03rebless.t @@ -6,7 +6,7 @@ use warnings; use Test::More; use DBIx::SearchBuilder::Handle; -BEGIN { require "t/utils.pl" } +BEGIN { require "./t/utils.pl" } our (@AvailableDrivers); use constant TESTS_PER_DRIVER => 4; diff --git a/t/03transactions.t b/t/03transactions.t index e641c19..ef0f973 100644 --- a/t/03transactions.t +++ b/t/03transactions.t @@ -4,7 +4,7 @@ use strict; use warnings; use Test::More; -BEGIN { require "t/utils.pl" } +BEGIN { require "./t/utils.pl" } our (@AvailableDrivers); use constant TESTS_PER_DRIVER => 52; diff --git a/t/03versions.t b/t/03versions.t index 79bb2e9..4acba37 100644 --- a/t/03versions.t +++ b/t/03versions.t @@ -5,7 +5,7 @@ use warnings; use Test::More; use DBIx::SearchBuilder::Handle; -BEGIN { require "t/utils.pl" } +BEGIN { require "./t/utils.pl" } our (@AvailableDrivers); use constant TESTS_PER_DRIVER => 6; diff --git a/t/10schema.t b/t/10schema.t index 2ff5ab6..fcf1a7b 100644 --- a/t/10schema.t +++ b/t/10schema.t @@ -8,7 +8,7 @@ use constant TESTS_PER_DRIVER => 14; our @AvailableDrivers; BEGIN { - require("t/utils.pl"); + require("./t/utils.pl"); my $total = 3 + scalar(@AvailableDrivers) * TESTS_PER_DRIVER; if( not eval { require DBIx::DBSchema } ) { plan skip_all => "DBIx::DBSchema not installed"; @@ -22,7 +22,7 @@ BEGIN { use_ok("DBIx::SearchBuilder::Handle"); } -require_ok("t/testmodels.pl"); +require_ok("./t/testmodels.pl"); foreach my $d ( @AvailableDrivers ) { SKIP: { diff --git a/t/11schema_records.t b/t/11schema_records.t index 4fc4dc4..a586cda 100644 --- a/t/11schema_records.t +++ b/t/11schema_records.t @@ -5,7 +5,7 @@ use strict; use warnings; use Test::More; -BEGIN { require "t/utils.pl" } +BEGIN { require "./t/utils.pl" } our (@AvailableDrivers); use constant TESTS_PER_DRIVER => 63; diff --git a/t/20set_edge_cases.t b/t/20set_edge_cases.t index 943f76a..d22b1ee 100644 --- a/t/20set_edge_cases.t +++ b/t/20set_edge_cases.t @@ -3,7 +3,7 @@ use strict; use warnings; use Test::More; -BEGIN { require "t/utils.pl" } +BEGIN { require "./t/utils.pl" } our (@AvailableDrivers); use constant TESTS_PER_DRIVER => 20; -- 2.14.1


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.