This is a live mirror of the Perl 5 development currently hosted at
https://github.com/perl/perl5
https://perl5.git.perl.org
/
perl5.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
91e4447
)
Skip locale test on OpenBSD, MirBSD and Bitrig too
author
Chris 'BinGOs' Williams
<chris@bingosnet.co.uk>
Mon, 17 Feb 2014 21:03:54 +0000
(21:03 +0000)
committer
Chris 'BinGOs' Williams
<chris@bingosnet.co.uk>
Mon, 17 Feb 2014 21:27:42 +0000
(21:27 +0000)
From the original ticket #115808 the following should produce
"Use of uninitialized value in print at -e line 1."
$ perl -wle 'use POSIX; print length setlocale POSIX::LC_ALL, "mtfnpy"'
16
So skip this test on OpenBSD, MirBSD and Bitrig
lib/locale.t
patch
|
blob
|
blame
|
history
diff --git
a/lib/locale.t
b/lib/locale.t
index
a330aa2
..
b195394
100644
(file)
--- a/
lib/locale.t
+++ b/
lib/locale.t
@@
-1852,7
+1852,7
@@
foreach $test_num ($first_locales_test_number..$final_locales_test_number) {
$test_num = $final_locales_test_number;
-unless ( $^O
eq 'dragonfly'
) {
+unless ( $^O
=~ m!^(dragonfly|openbsd|bitrig|mirbsd)$!
) {
# perl #115808
use warnings;
my $warned = 0;