lang-perl-*: Avoid FAIL on NetBSD.

* gettext-tools/tests/lang-perl-1: On NetBSD, don't test the ISO-8859-1 locale.
* gettext-tools/tests/lang-perl-2: Likewise.

diff --git a/gettext-tools/tests/lang-perl-1 b/gettext-tools/tests/lang-perl-1
index 40b1424be51c87d57301731db0ee495b2705a02c..22bcbd4b4b16b6f6c1a5952e054bb55973da4791 100755 (executable)
--- a/gettext-tools/tests/lang-perl-1
+++ b/gettext-tools/tests/lang-perl-1
@@ -100,6 +100,10 @@ perl -e 'use Locale::Messages;' 2>/dev/null \
 
 : ${LOCALE_FR=fr_FR}
 : ${LOCALE_FR_UTF8=fr_FR.UTF-8}
+# perl on NetBSD supports only UTF-8 locales.
+case "$host_os" in
+  netbsd*) LOCALE_FR=none ;;
+esac
 if test $LOCALE_FR != none; then
   prepare_locale_ fr $LOCALE_FR
   LANGUAGE= LANG=$LOCALE_FR LC_MESSAGES= LC_CTYPE= LC_ALL= perl program1.pl > prog.out || Exit 1

diff --git a/gettext-tools/tests/lang-perl-2 b/gettext-tools/tests/lang-perl-2
index 5bc2fa84214d9cdbbce1e734d574653da98441fa..45d40ef4840c3678a24a5c9c0b27926219a64d59 100755 (executable)
--- a/gettext-tools/tests/lang-perl-2
+++ b/gettext-tools/tests/lang-perl-2
@@ -100,6 +100,10 @@ perl -M'Locale::TextDomain' -e '' 2>/dev/null \
 
 : ${LOCALE_FR=fr_FR}
 : ${LOCALE_FR_UTF8=fr_FR.UTF-8}
+# perl on NetBSD supports only UTF-8 locales.
+case "$host_os" in
+  netbsd*) LOCALE_FR=none ;;
+esac
 if test $LOCALE_FR != none; then
   prepare_locale_ fr $LOCALE_FR
   LANGUAGE= LANG=$LOCALE_FR LC_MESSAGES= LC_CTYPE= LC_ALL= perl program2.pl > prog.out || Exit 1