diff options
| author | Petr Písař <ppisar@redhat.com> | 2013-07-08 16:10:38 +0200 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2013-07-09 21:27:45 -0700 |
| commit | fc4b816451cc28ba7a582a778b109e5339551a65 (patch) | |
| tree | 7d54e658f84dc57f332b98b7116a9977de95a097 /lib/perl5db.t | |
| parent | a76c80a7e25ec6178a519942045a9a18e598c539 (diff) | |
| download | perl-fc4b816451cc28ba7a582a778b109e5339551a65.tar.gz | |
Suppress system Term::ReadLine::Gnu
perl5db.t will die in Term::ReadLine if Term::ReadLine::Gnu is installed
in the system. Let's favour core implementation.
Best solution would be to prune @INC to prevent from loading already
installed modules like this:
BEGIN {
use Config;
@INC = grep { ! /^\Q$Config{installprefix}\E(\/|\z)/ } @INC;
}
However that is not possible (now) due to various execs (even without
proper -I) in the harness chain. perl should implement -nostdinc
option.
Signed-off-by: Petr Písař <ppisar@redhat.com>
Diffstat (limited to 'lib/perl5db.t')
| -rw-r--r-- | lib/perl5db.t | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lib/perl5db.t b/lib/perl5db.t index 9a57960896..6ab4694608 100644 --- a/lib/perl5db.t +++ b/lib/perl5db.t @@ -26,6 +26,7 @@ BEGIN { print "1..0 # Skip: \$ENV{PERL5DB} is already set to '$ENV{PERL5DB}'\n"; exit 0; } + $ENV{PERL_RL} = 'Perl'; # Suppress system Term::ReadLine::Gnu } plan(116); |