Skip to content

Commit 182ca5b

Browse files
committed
test: get run/locale.t passing before cosmo4
1 parent e632a1c commit 182ca5b

1 file changed

Lines changed: 13 additions & 0 deletions

File tree

share/5.44-cosmo3.patch

Lines changed: 13 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -875,6 +875,19 @@ index 3f55205702..cd8bdffedc 100644
875875
Perl::Unsafe::Signals
876876
perlbug(1)
877877
PerlIO::locale
878+
diff --git a/t/run/locale.t b/t/run/locale.t
879+
index 67893235e7..0658110af6 100644
880+
--- a/t/run/locale.t
881+
+++ b/t/run/locale.t
882+
@@ -709,6 +709,8 @@ SKIP: { # GH #20054
883+
&& $Config{d_setlocale_accepts_any_locale_name} eq 'define';
884+
skip "z/OS setlocale() crashes with illegal locale names", 1
885+
if $^O eq 'os390';
886+
+ skip "Cosmopolitian setlocale(category, \"\") always sets locale \"C\"", 1
887+
+ if $^O eq 'cosmo';
888+
889+
my @lc_all_locales = find_locales('LC_ALL');
890+
my $locale = $lc_all_locales[0];
878891
diff --git a/win32/GNUmakefile b/win32/GNUmakefile
879892
index 3c3291d283..a6a46a1122 100644
880893
--- a/win32/GNUmakefile

0 commit comments

Comments
 (0)