Mailing-List:	contact cygwin-help AT cygwin DOT com; run by ezmlm
List-Subscribe:	<mailto:cygwin-subscribe AT cygwin DOT com>
List-Archive:	<http://sourceware.org/ml/cygwin/>
List-Post:	<mailto:cygwin AT cygwin DOT com>
List-Help:	<mailto:cygwin-help AT cygwin DOT com>, <http://sourceware.org/ml/#faqs>
Sender:	cygwin-owner AT cygwin DOT com
Mail-Followup-To:	cygwin AT cygwin DOT com
Delivered-To:	mailing list cygwin AT cygwin DOT com
Date:	Sun, 17 Jul 2005 15:41:40 -0700
From:	Michael G Schwern <schwern AT pobox DOT com>
To:	"Gerrit P. Haase" <gerrit AT familiehaase DOT de>
Cc:	Andrew Ho <andrew AT tellme DOT com>, cygwin AT cygwin DOT com, makemaker AT perl DOT org,
	perl5-porters AT perl DOT org, petdance AT cpan DOT org
Subject:	Re: [perl-5.8.7] Perl regression tests fail when lib directory is present
Message-ID:	<20050717224140.GA6896@windhund.schwern.org>
References:	<Pine DOT GSO DOT 4 DOT 62 DOT 0507160052140 DOT 18081 AT shell02 DOT corp DOT tellme DOT com> <42D8D5F3 DOT 9060307 AT familiehaase DOT de> <Pine DOT GSO DOT 4 DOT 62 DOT 0507161219350 DOT 18081 AT shell02 DOT corp DOT tellme DOT com> <42DA398D DOT 60802 AT familiehaase DOT de> <20050717195041 DOT GC5605 AT windhund DOT schwern DOT org> <42DABCA8 DOT 2020603 AT familiehaase DOT de> <20050717211809 DOT GB6411 AT windhund DOT schwern DOT org> <42DAD10B DOT 4080807 AT familiehaase DOT de> <20050717215802 DOT GA6714 AT windhund DOT schwern DOT org> <42DADB53 DOT 1060006 AT familiehaase DOT de>
Mime-Version:	1.0
In-Reply-To:	<42DADB53.1060006@familiehaase.de>
User-Agent:	Mutt/1.4.2.1i

On Mon, Jul 18, 2005 at 12:27:31AM +0200, Gerrit P. Haase wrote:
> >perl -MTest::Harness -Iblib/lib -Iblib/arch -wle '$Test::Harness::Debug = 
> >1;  $Test::Harness::Verbose = 1;  runtests @ARGV' t/*.t
> >The lines we're looking for are "# PERL5LIB=..." from THS->analyze_file()
> >telling us how TH is setting @INC.
> 
> t/test0....# Running: /usr/bin/perl -w t/test0.t
> # PERL5LIB=blib/lib:blib/arch
> 1..1
> # Running under perl version 5.008007 for cygwin
> # Current time local: Mon Jul 18 00:14:08 2005
> # Current time GMT:   Sun Jul 17 22:14:08 2005
> # Using Test.pm version 1.25
> ok 1
> ok
> t/test1....# Running: /usr/bin/perl -w t/test1.t
> # PERL5LIB=

At this point I'd suspect there's something broken about %ENV.  Try replacing
this in THS->analyze_file:

    local $ENV{PERL5LIB} = $self->_INC2PERL5LIB;
    if ( $Test::Harness::Debug ) {
        local $^W=0; # ignore undef warnings
        print "# PERL5LIB=$ENV{PERL5LIB}\n";
    }

with this:

    my $libs = $self->_INC2PERL5LIB;
    local $ENV{PERL5LIB} = $libs;
    if ( $Test::Harness::Debug ) {
        local $^W=0; # ignore undef warnings
        print STDERR "# PERL5LIB=$ENV{PERL5LIB}\n";
	print STDERR "# libs=$libs\n";
    }

to determine if _INC2PERL5LIB() is acting properly.


-- 
Michael G Schwern     schwern AT pobox DOT com     http://www.pobox.com/~schwern
Just call me 'Moron Sugar'.
	http://www.somethingpositive.net/sp05182002.shtml

--
Unsubscribe info:      http://cygwin.com/ml/#unsubscribe-simple
Problem reports:       http://cygwin.com/problems.html
Documentation:         http://cygwin.com/docs.html
FAQ:                   http://cygwin.com/faq/

- Raw text -