1 files changed, 3 insertions, 0 deletions
diff --git a/sv.c b/sv.c
index 13a5ee5150..bc5f95143b 100644
--- a/sv.c
+++ b/sv.c
@@ -15892,6 +15892,9 @@ perl_clone_using(PerlInterpreter *proto_perl, UV flags,
         PL_curlocales[i] = SAVEPV("C");
     }
 #endif
+#ifdef USE_PL_CUR_LC_ALL
+    PL_cur_LC_ALL = SAVEPV("C");
+#endif
 #ifdef USE_LOCALE_CTYPE
     Copy(PL_fold, PL_fold_locale, 256, U8);