diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-12-04 14:40:28 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-12-04 14:40:28 +0000 |
| commit | b429a72e21c23c9f086d1c98fa5499cd4403a815 (patch) | |
| tree | 4d0cdf39c0959b85bd87e9d4e6d2013f49474e7f /lib/open.t | |
| parent | 276c9210946afd5a25f08e38e69079c3d3456630 (diff) | |
| download | perl-b429a72e21c23c9f086d1c98fa5499cd4403a815.tar.gz | |
LC_ALL might trump LANG.
p4raw-id: //depot/perl@13460
Diffstat (limited to 'lib/open.t')
| -rw-r--r-- | lib/open.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/open.t b/lib/open.t index 3a42ce5b15..15a38bc992 100644 --- a/lib/open.t +++ b/lib/open.t @@ -183,7 +183,7 @@ eval { open::_get_locale_encoding() }; like( $@, qr/too ambiguous/, 'should die with ambiguous locale encoding' ); %%% # the special :locale layer -$ENV{LANG} = 'ru_RU.KOI8-R'; +$ENV{LC_ALL} = $ENV{LANG} = 'ru_RU.KOI8-R'; # the :locale will probe the locale environment variables like LANG use open OUT => ':locale'; open(O, ">koi8"); |