summaryrefslogtreecommitdiff
path: root/t/re/charset.t
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2015-03-08 22:26:17 -0600
committerKarl Williamson <khw@cpan.org>2015-03-09 09:37:08 -0600
commitef9d5242d3ebebaa273eaaaf24138e38db8939b2 (patch)
tree75c42b6e338515ade395c906d99104656cab779c /t/re/charset.t
parent128e4113466e835078eb016709e5d23b86be3120 (diff)
downloadperl-ef9d5242d3ebebaa273eaaaf24138e38db8939b2.tar.gz
Skip various locale tests when locales are not available
It is possible to compile Perl without locales, and some platforms may not have them available properly. These tests were failing under these conditions. This commit uses the new infrastructure in loc_tools.pl to centralize the knowledge of how to determine if locales are available.
Diffstat (limited to 't/re/charset.t')
-rw-r--r--t/re/charset.t2
1 files changed, 1 insertions, 1 deletions
diff --git a/t/re/charset.t b/t/re/charset.t
index 4c3e5371d6..7a5852ad46 100644
--- a/t/re/charset.t
+++ b/t/re/charset.t
@@ -41,7 +41,7 @@ $testcases{'[:word:]'} = $testcases{'\w'};
my $utf8_locale;
my @charsets = qw(a d u aa);
-if (! is_miniperl() && $Config{d_setlocale}) {
+if (! is_miniperl() && locales_enabled('LC_CTYPE')) {
require POSIX;
my $current_locale = POSIX::setlocale( &POSIX::LC_ALL, "C") // "";
if ($current_locale eq 'C') {