]> git.deb.at Git - deb/packages.git/blob - lib/Packages/I18N/LanguageNames.pm
Merge branch 'debian-refactor' into ubuntu-master
[deb/packages.git] / lib / Packages / I18N / LanguageNames.pm
1 # $Id$
2 #
3 # Taken from the webwml CVS tree (english/templates/language_names.wml)
4
5 package Packages::I18N::LanguageNames;
6
7 use strict;
8 use warnings;
9
10 use Exporter;
11 use Packages::I18N::Locale;
12
13 our @ISA = qw( Exporter );
14 our @EXPORT = qw( get_language_name get_all_languages );
15
16 my %ctrans = (
17         ar    => N_("Arabic"),
18         fi    => N_("Finnish"),
19         hr    => N_("Croatian"),
20         da    => N_("Danish"),
21         nl    => N_("Dutch"),
22         en    => N_("English"),
23         fr    => N_("French"),
24         de    => N_("German"),
25         it    => N_("Italian"),
26         ja    => N_("Japanese"),
27         ko    => N_("Korean"),
28         es    => N_("Spanish"),
29         pt_BR => N_("Portuguese (Brasilia)"),
30         pt_PT => N_("Portuguese (Portugal)"),
31         zh    => N_("Chinese"),
32         sv_SE => N_("Swedish"),
33         pl    => N_("Polish"),
34         'no'  => N_("Norwegian"),
35         tr    => N_("Turkish"),
36         ru    => N_("Russian"),
37         cs    => N_("Czech"),
38         eo    => N_("Esperanto"),
39         hu    => N_("Hungarian"),
40         ro    => N_("Romanian"),
41         sk    => N_("Slovak"),
42         el    => N_("Greek"),
43         ca    => N_("Catalan"),
44         lt    => N_("Lithuanian"),
45         sl    => N_("Slovene"),
46         bg    => N_("Bulgarian"),
47         uk    => N_("Ukrainian"),
48 );
49
50 sub get_language_name {
51     return $ctrans{$_[0]};
52 }
53
54 sub get_all_languages {
55     return %ctrans;
56 }
57
58 1;