~ubuntu-branches/ubuntu/wily/libintl-perl/wily-proposed

« back to all changes in this revision

Viewing changes to tests/03bind_textdomain_codeset_xs.t

• browse files at revision 3
• compare with another revision
• download diff
• download tarball
• view history from revision 3

Show diffs side-by-side

added

removed

tests/03bind_textdomain_codeset_xs.t

41

41

Locale::Messages::nl_putenv ("LANG=de_AT");

42

42

Locale::Messages::nl_putenv ("LC_MESSAGES=de_AT");

43

43

Locale::Messages::nl_putenv ("OUTPUT_CHARSET");

44

 

POSIX::setlocale (POSIX::LC_ALL() => '');

 

44

my $missing_locale = POSIX::setlocale (POSIX::LC_ALL() => '') ?

 

45

        '' : 'locale de_AT missing';

45

46

 

46

47

my $bound_dir = bindtextdomain $textdomain => $locale_dir;

47

48

 

56

57

 

57

58

ok defined $bound_codeset && 'ISO-8859-1' eq uc $bound_codeset;

58

59

 

59

 

ok 'J�nner' eq gettext ('January');

60

 

ok 'M�rz' eq gettext ('March');

 

60

skip $missing_locale, 'J�nner' eq gettext ('January');

 

61

skip $missing_locale, 'M�rz' eq gettext ('March');

61

62

 

62

63

# This will cause GNU gettext to re-load our catalog.

63

64

$bound_dir = bindtextdomain $textdomain => $locale_dir . '/../LocaleData';

70

71

 

71

72

ok defined $bound_codeset && 'UTF-8' eq uc $bound_codeset;

72

73

 

73

 

ok 'Jänner' eq gettext ('January');

74

 

ok 'März' eq gettext ('March');

 

74

skip $missing_locale, 'Jänner' eq gettext ('January');

 

75

skip $missing_locale, 'März' eq gettext ('March');

75

76

 

76

77

__END__

77

78

 

• Older »

Loggerhead is a web-based interface for Breezy
Version: 2.0.1