Revert "APItest/t/handy.t: Slightly simplify" blead
authorKarl Williamson <khw@cpan.org>
Thu, 8 Dec 2016 02:04:52 +0000 (19:04 -0700)
committerKarl Williamson <khw@cpan.org>
Thu, 8 Dec 2016 02:10:53 +0000 (19:10 -0700)
This reverts commit 96970a3c8cbe5ad489ce831380f0e208315ea651.

I misread the code and this commit should never have been done.  The
statements I thought were identical did have some differences.

ext/XS-APItest/t/handy.t

index acf3af5..a85f701 100644 (file)
@@ -242,6 +242,10 @@ foreach my $name (sort keys %properties) {
                 my $truth = truth($matches && (utf8::native_to_unicode($i) < 128 || $i > 255));
                 is ($ret, $truth, "is${function}_LC_utf8( $display_name ) == $truth (C locale)");
             }
+        }
+
+        if ($name ne 'vertws' && defined $utf8_locale) {
+            use locale;
 
             POSIX::setlocale( &POSIX::LC_ALL, $utf8_locale);
             $ret = truth eval "test_is${function}_LC_utf8('$char')";