aboutsummaryrefslogtreecommitdiffstats
path: root/main/perl/musl-locale.patch
diff options
context:
space:
mode:
authorNatanael Copa <ncopa@alpinelinux.org>2019-05-27 18:10:02 +0200
committerNatanael Copa <ncopa@alpinelinux.org>2019-05-27 16:57:49 +0000
commit04747e4e2db80406782fa71d7744da0c613987e9 (patch)
tree20f5639e31c17f5199a983dad50ab98046202ccd /main/perl/musl-locale.patch
parentdd0ae9ab45c745d55419924265d4dc5afe26b7c0 (diff)
downloadaports-04747e4e2db80406782fa71d7744da0c613987e9.tar.gz
aports-04747e4e2db80406782fa71d7744da0c613987e9.tar.bz2
aports-04747e4e2db80406782fa71d7744da0c613987e9.tar.xz
main/perl: fix locale issue
fixes #10459
Diffstat (limited to 'main/perl/musl-locale.patch')
-rw-r--r--main/perl/musl-locale.patch37
1 files changed, 37 insertions, 0 deletions
diff --git a/main/perl/musl-locale.patch b/main/perl/musl-locale.patch
new file mode 100644
index 0000000000..65839f1fe7
--- /dev/null
+++ b/main/perl/musl-locale.patch
@@ -0,0 +1,37 @@
+diff --git a/locale.c b/locale.c
+index 7653340..7243cb1 100644
+--- a/locale.c
++++ b/locale.c
+@@ -581,6 +581,10 @@ S_emulate_setlocale(const int category,
+
+ return (char *) querylocale(mask, cur_obj);
+
++# elif defined(_NL_LOCALE_NAME)
++
++ return (char *) nl_langinfo_l(_NL_LOCALE_NAME(category), cur_obj);
++
+ # else
+
+ /* If this assert fails, adjust the size of curlocales in intrpvar.h */
+@@ -737,7 +741,7 @@ S_emulate_setlocale(const int category,
+
+ /* Here, we are switching locales. */
+
+-# ifndef HAS_QUERYLOCALE
++# if !defined(HAS_QUERYLOCALE) && !defined(_NL_LOCALE_NAME)
+
+ if (strEQ(locale, "")) {
+
+@@ -1094,6 +1098,12 @@ S_emulate_setlocale(const int category,
+ locale = querylocale(mask, new_obj);
+ }
+
++# elif defined(_NL_LOCALE_NAME)
++
++ if (strEQ(locale, "")) {
++ locale = nl_langinfo_l(_NL_LOCALE_NAME(category), new_obj);
++ }
++
+ # else
+
+ /* Here, 'locale' is the return value */