summaryrefslogtreecommitdiff
path: root/locale.c
diff options
context:
space:
mode:
Diffstat (limited to 'locale.c')
-rw-r--r--locale.c3
1 files changed, 0 insertions, 3 deletions
diff --git a/locale.c b/locale.c
index a36e8dc8b4..9b0979d27e 100644
--- a/locale.c
+++ b/locale.c
@@ -707,7 +707,6 @@ Perl_init_i18nl10n(pTHX_ int printwarn)
}
if (!setlocale_failure) {
# ifdef USE_LOCALE_CTYPE
- Safefree(curctype);
if (! (curctype =
my_setlocale(LC_CTYPE,
(!done && (lang || PerlEnv_getenv("LC_CTYPE")))
@@ -717,7 +716,6 @@ Perl_init_i18nl10n(pTHX_ int printwarn)
curctype = savepv(curctype);
# endif /* USE_LOCALE_CTYPE */
# ifdef USE_LOCALE_COLLATE
- Safefree(curcoll);
if (! (curcoll =
my_setlocale(LC_COLLATE,
(!done && (lang || PerlEnv_getenv("LC_COLLATE")))
@@ -727,7 +725,6 @@ Perl_init_i18nl10n(pTHX_ int printwarn)
curcoll = savepv(curcoll);
# endif /* USE_LOCALE_COLLATE */
# ifdef USE_LOCALE_NUMERIC
- Safefree(curnum);
if (! (curnum =
my_setlocale(LC_NUMERIC,
(!done && (lang || PerlEnv_getenv("LC_NUMERIC")))