From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Wed, 8 Nov 2000 18:25:14 +0000 (+0000)
Subject: Do not test UTF-8 locales since that the tests would require
X-Git-Tag: accepted/trunk/20130322.191538~33699
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=06b2af23355fc42815af71c20b189a3727d5c00e;p=platform%2Fupstream%2Fperl.git

Do not test UTF-8 locales since that the tests would require
polymorphic regexen.

p4raw-id: //depot/perl@7610
---

diff --git a/t/pragma/locale.t b/t/pragma/locale.t
index 42c6909..f8f4840 100755
--- a/t/pragma/locale.t
+++ b/t/pragma/locale.t
@@ -401,6 +401,9 @@ if (-x "/usr/bin/locale" && open(LOCALES, "/usr/bin/locale -a|")) {
 
 setlocale(LC_ALL, "C");
 
+# UTF-8 and locales simply do not work yet. --jhi
+@Locale = grep {!/utf-?8/i} @Locale;
+
 @Locale = sort @Locale;
 
 debug "# Locales = @Locale\n";