summaryrefslogtreecommitdiff
path: root/macros/texinfo/texinfo/tp/maintain/lib/libintl-perl/tests/03dgettext_pp.t
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2021-07-04 03:01:24 +0000
committerNorbert Preining <norbert@preining.info>2021-07-04 03:01:24 +0000
commit7994f86ec5e18f9d0d9f90161a2f26dd26d26af7 (patch)
tree88edb7d1a1aed3183a1350202c898716b4ac59ce /macros/texinfo/texinfo/tp/maintain/lib/libintl-perl/tests/03dgettext_pp.t
parent03fa062b03ce2bb5385f8f30888f94d441fa5cb4 (diff)
CTAN sync 202107040301
Diffstat (limited to 'macros/texinfo/texinfo/tp/maintain/lib/libintl-perl/tests/03dgettext_pp.t')
-rw-r--r--macros/texinfo/texinfo/tp/maintain/lib/libintl-perl/tests/03dgettext_pp.t6
1 files changed, 3 insertions, 3 deletions
diff --git a/macros/texinfo/texinfo/tp/maintain/lib/libintl-perl/tests/03dgettext_pp.t b/macros/texinfo/texinfo/tp/maintain/lib/libintl-perl/tests/03dgettext_pp.t
index af4c84cadb..e841f4e489 100644
--- a/macros/texinfo/texinfo/tp/maintain/lib/libintl-perl/tests/03dgettext_pp.t
+++ b/macros/texinfo/texinfo/tp/maintain/lib/libintl-perl/tests/03dgettext_pp.t
@@ -40,7 +40,7 @@ Locale::Messages::nl_putenv ("LC_MESSAGES=de_AT");
Locale::Messages::nl_putenv ("OUTPUT_CHARSET=iso-8859-1");
my $missing_locale = 'locale de_AT missing';
-my $setlocale = POSIX::setlocale (POSIX::LC_ALL() => '');
+my $setlocale = Locale::Messages::setlocale (POSIX::LC_ALL() => '');
if ($setlocale && $setlocale =~ /(?:austria|at)/i) {
$missing_locale = '';
} else {
@@ -60,12 +60,12 @@ $bound_dir = bindtextdomain additional => $locale_dir;
ok defined $bound_dir;
ok (File::Spec->catdir ($bound_dir), File::Spec->catdir ($locale_dir));
-ok 'Dezember', dgettext (existing => 'December');
+skip $missing_locale, 'Dezember', dgettext (existing => 'December');
ok 'September', dgettext (existing => 'September');
ok 'Not translated', dgettext (existing => 'Not translated');
skip $missing_locale, 'Jänner', dgettext (existing => 'January');
-ok 'Montag', dgettext (additional => 'Monday');
+skip $missing_locale, 'Montag', dgettext (additional => 'Monday');
ok dgettext (additional => 'Not translated'), 'Not translated';
skip $missing_locale, dgettext (additional => 'Saturday'), 'Sonnabend';