<select id="locale" name="locale">
<option value=""></option>
[% FOREACH l IN locales %]
- [% IF l == locale %]
- <option value="[% l %]" selected="selected">[% l %]</option>
+ [% IF l.language == locale %]
+ <option value="[% l.language %]" selected="selected">[% l.description %]</option>
[% ELSE %]
- <option value="[% l %]">[% l %]</option>
+ <option value="[% l.language %]">[% l.description %]</option>
[% END %]
[% END %]
</select>
- <span class="hint">If empty, system locale is used</span>
+ <span class="hint">If empty, English is used</span>
</li>
<li id="more_options">
<table id="moreoptionst">
<option value="[% locale %]">[% locale %]</option>
[% END %]
</select>
- <span class="hint">If empty, system locale is used</span>
+ <span class="hint">If empty, English is used</span>
</li>
</ol>
<table>
}
$template->param(numberpatterns => \@numberpatternloop);
- # Get installed locales
- # FIXME this will not work with all environments.
- # If call to locale fails, @locales will be an empty array, which is fine.
- my @locales = map {
- chomp;
- # we don't want POSIX and C locales
- /^C|^POSIX$/ ? () : $_
- } `locale -a`;
- $template->param(locales => \@locales);
+ my $languages = [ map {
+ {
+ language => $_->{language},
+ description => $_->{native_description} || $_->{language}
+ }
+ } @{ C4::Languages::getTranslatedLanguages() } ];
+
+ $template->param( locales => $languages );
output_html_with_http_headers $query, $cookie, $template->output;
}
my @frequencies = GetSubscriptionFrequencies();
my @subtypes;
push @subtypes, { value => $_ } for (qw/ issues weeks months /);
- my @locales = map {
- chomp;
- /^C|^POSIX$/ ? () : $_
- } `locale -a`;
+ my $languages = [ map {
+ {
+ language => $_->{language},
+ description => $_->{native_description} || $_->{language}
+ }
+ } @{ C4::Languages::getTranslatedLanguages() } ];
$template->param(
$op => 1,
frequencies_loop => \@frequencies,
subtypes_loop => \@subtypes,
- locales => \@locales,
- DHTMLcalendar_dateformat => C4::Dates->DHTMLcalendar(),
+ locales => $languages,
);
output_html_with_http_headers $input, $cookie, $template->output;
exit;