This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Locale tests assumed POSIX, not true in minitest.
[perl5.git] / t / loc_tools.pl
index 90865e4..bac8cc7 100644 (file)
@@ -90,7 +90,10 @@ sub find_locales ($) {  # Returns an array of all the locales we found on the
 
     # Done this way in case this is 'required' in the caller before seeing if
     # this is miniperl.
-    require POSIX; import POSIX 'locale_h';
+    eval { require POSIX; import POSIX 'locale_h'; };
+    unless (defined &POSIX::LC_CTYPE) {
+      return;
+    }
 
     _trylocale("C", $categories, \@Locale);
     _trylocale("POSIX", $categories, \@Locale);