Lines 397-406
sub _build_languages_arrayref {
Link Here
|
397 |
# group this language, key by langtag |
397 |
# group this language, key by langtag |
398 |
$language_subtags_hashref->{'sublanguage_current'} = 1 if $translated_language eq $current_language; |
398 |
$language_subtags_hashref->{'sublanguage_current'} = 1 if $translated_language eq $current_language; |
399 |
$language_subtags_hashref->{'rfc4646_subtag'} = $translated_language; |
399 |
$language_subtags_hashref->{'rfc4646_subtag'} = $translated_language; |
400 |
$language_subtags_hashref->{'native_description'} = language_get_description($language_subtags_hashref->{language},$language_subtags_hashref->{language},'language'); |
|
|
401 |
$language_subtags_hashref->{'script_description'} = language_get_description($language_subtags_hashref->{script},$language_subtags_hashref->{'language'},'script'); |
402 |
$language_subtags_hashref->{'region_description'} = language_get_description($language_subtags_hashref->{region},$language_subtags_hashref->{'language'},'region'); |
403 |
$language_subtags_hashref->{'variant_description'} = language_get_description($language_subtags_hashref->{variant},$language_subtags_hashref->{'language'},'variant'); |
404 |
$track_language_groups->{$language_subtags_hashref->{'language'}}++; |
400 |
$track_language_groups->{$language_subtags_hashref->{'language'}}++; |
405 |
push ( @{ $language_groups->{$language_subtags_hashref->{language}} }, $language_subtags_hashref ); |
401 |
push ( @{ $language_groups->{$language_subtags_hashref->{language}} }, $language_subtags_hashref ); |
406 |
} |
402 |
} |
Lines 416-422
sub _build_languages_arrayref {
Link Here
|
416 |
push @languages_loop, { |
412 |
push @languages_loop, { |
417 |
# this is only use if there is one |
413 |
# this is only use if there is one |
418 |
rfc4646_subtag => @$value[0]->{rfc4646_subtag}, |
414 |
rfc4646_subtag => @$value[0]->{rfc4646_subtag}, |
419 |
native_description => language_get_description($key,$key,'language'), |
|
|
420 |
language => $key, |
415 |
language => $key, |
421 |
sublanguages_loop => $value, |
416 |
sublanguages_loop => $value, |
422 |
plural => $track_language_groups->{$key} >1 ? 1 : 0, |
417 |
plural => $track_language_groups->{$key} >1 ? 1 : 0, |