diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-02-13 14:06:15 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-02-13 14:06:15 +0000 |
commit | 67127a85e86d9ef67c9a136224ffce237c7df32b (patch) | |
tree | 63bb605c9554f59d0ba5549c1d2e157399c7a65a /util.c | |
parent | f1f802f72d2a5ab6b92210fa96748318d879b276 (diff) | |
download | perl-67127a85e86d9ef67c9a136224ffce237c7df32b.tar.gz |
environ array wrongly assumed in Perl_init_i18nl10n(),
noticed by Chris Nandor in MacOS Classic.
p4raw-id: //depot/perl@8790
Diffstat (limited to 'util.c')
-rw-r--r-- | util.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -665,7 +665,7 @@ Perl_init_i18nl10n(pTHX_ int printwarn) * -1 = fallback to C locale failed */ -#ifdef USE_LOCALE +#if defined(USE_LOCALE) && defined(USE_ENVIRON_ARRAY) #ifdef USE_LOCALE_CTYPE char *curctype = NULL; @@ -891,7 +891,7 @@ Perl_init_i18nl10n(pTHX_ int printwarn) #endif /* USE_LOCALE_NUMERIC */ } -#endif /* USE_LOCALE */ +#endif /* USE_LOCALE && USE_ENVIRON_ARRAY */ #ifdef USE_LOCALE_CTYPE if (curctype != NULL) |