This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
In t/op/stat.t, ensure that the output of ls is not localised.
authorNicholas Clark <nick@ccl4.org>
Tue, 5 Jun 2012 14:53:43 +0000 (16:53 +0200)
committerNicholas Clark <nick@ccl4.org>
Tue, 26 Jun 2012 08:40:37 +0000 (10:40 +0200)
t/op/stat.t parses the output of ls, and will get confused if localisation
happens to change the header line containing the total to a word starting
with the letter c. This fixes the build issue on a Czech locale reported
in http://perlmonks.org/?node=973257 and RT #113472.

t/op/stat.t

index af1fa5e..89411c7 100644 (file)
@@ -24,6 +24,9 @@ plan tests => 113;
 
 my $Perl = which_perl();
 
+$ENV{LC_ALL}   = 'C';          # Forge English error messages.
+$ENV{LANGUAGE} = 'C';          # Ditto in GNU.
+
 $Is_Amiga   = $^O eq 'amigaos';
 $Is_Cygwin  = $^O eq 'cygwin';
 $Is_Darwin  = $^O eq 'darwin';