Michael Schröder
b1d1e51775
OBS-URL: https://build.opensuse.org/package/show/devel:languages:perl/perl?expand=0&rev=245
15 lines
608 B
Diff
15 lines
608 B
Diff
--- locale.c.orig 2023-11-28 11:57:28.000000000 +0000
|
|
+++ locale.c 2024-04-12 11:06:26.236116452 +0000
|
|
@@ -5280,11 +5280,6 @@ Perl_init_i18nl10n(pTHX_ int printwarn)
|
|
DEBUG_Lv(PerlIO_printf(Perl_debug_log, "created C object %p\n",
|
|
PL_C_locale_obj));
|
|
|
|
- /* Switch to using the POSIX 2008 interface now. This would happen below
|
|
- * anyway, but deferring it can lead to leaks of memory that would also get
|
|
- * malloc'd in the interim */
|
|
- uselocale(PL_C_locale_obj);
|
|
-
|
|
# ifdef USE_LOCALE_NUMERIC
|
|
|
|
PL_underlying_numeric_obj = duplocale(PL_C_locale_obj);
|