Op een druilerige winterdag (Wednesday 10 March 2004 12:00), schreef Rafael
Garcia-Suarez:
> Abe Timmerman wrote in perl.daily-build :
> >> The recent smoke failures noticed by Merijn are reproducible with
> >> the environment variables
> >> PERL_UNICODE=""
> >> LC_ALL=fr_FR.utf8 (or another utf8 locale)
> >> perlrun states clearly that PERL_UNICODE being unset is not equivalent
> >> to PERL_UNICODE="", but to PERL_UNICODE="0". I don't know how
> >> Test::Smoke sets those variables up,
> >
> > From Test::Smoke::Smoker::make_test()
> >
> > local( $ENV{PERLIO}, $ENV{LC_ALL}, $ENV{PERL_UNICODE} ) =
> > ( "", defined $ENV{LC_ALL} ? $ENV{LC_ALL} : "", "" );
>
> I was merely suggesting something like
> local( $ENV{PERLIO}, $ENV{LC_ALL}, $ENV{PERL_UNICODE} ) =
> ( "", defined $ENV{LC_ALL} ? $ENV{LC_ALL} : "",
> $ENV{LC_ALL} ? "" : undef,
> );
> because if I understand the setup correctly nothing is ever smoked
> without PERL_UNICODE="". And the default mode of operation for most
> people is with PERL_UNICODE unset.
$ENV{PERL_UNICODE} is explicitly deleted in the cases where the env is not
UTF8 (locale) and so is $ENV{LC_ALL} (unless force_c_locale was set))
$perlio can be one of 'stdio', 'perlio' or 'locale'
if ( $perlio ne 'locale' ) {
$ENV{PERLIO} = $perlio;
$self->{is_win32} and $ENV{PERLIO} .= " :crlf";
$ENV{LC_ALL} = 'C' if $self->{force_c_locale};
$ENV{LC_ALL} or delete $ENV{LC_ALL};
delete $ENV{PERL_UNICODE};
> Makes sense ?
If I understand you correctly, so much, that it already is this way...
Does the answer to "How do I investigate failures?" in the Test::Smoke FAQ
help?
Good luck,
Abe
--
Schwern> Anything else you'd like? Side order of fries? Clean your stables?
Schwern> Get you an apple? Part the Red Sea?
I guess I otherwise would sense some sarcasm in your voice but
unfortunately my sarcasm-o-meter burned out years ago from prolonged
exposure to myself.
-- Jarkko Hietaniemi on p5p @ 2002-02-03
