Lines 436-445
sub _build_languages_arrayref {
Link Here
|
436 |
# group this language, key by langtag |
436 |
# group this language, key by langtag |
437 |
$language_subtags_hashref->{'sublanguage_current'} = 1 if $translated_language eq $current_language; |
437 |
$language_subtags_hashref->{'sublanguage_current'} = 1 if $translated_language eq $current_language; |
438 |
$language_subtags_hashref->{'rfc4646_subtag'} = $translated_language; |
438 |
$language_subtags_hashref->{'rfc4646_subtag'} = $translated_language; |
439 |
$language_subtags_hashref->{'native_description'} = language_get_description($language_subtags_hashref->{language},$language_subtags_hashref->{language},'language'); |
|
|
440 |
$language_subtags_hashref->{'script_description'} = language_get_description($language_subtags_hashref->{script},$language_subtags_hashref->{'language'},'script'); |
441 |
$language_subtags_hashref->{'region_description'} = language_get_description($language_subtags_hashref->{region},$language_subtags_hashref->{'language'},'region'); |
442 |
$language_subtags_hashref->{'variant_description'} = language_get_description($language_subtags_hashref->{variant},$language_subtags_hashref->{'language'},'variant'); |
443 |
$track_language_groups->{$language_subtags_hashref->{'language'}}++; |
439 |
$track_language_groups->{$language_subtags_hashref->{'language'}}++; |
444 |
push ( @{ $language_groups->{$language_subtags_hashref->{language}} }, $language_subtags_hashref ); |
440 |
push ( @{ $language_groups->{$language_subtags_hashref->{language}} }, $language_subtags_hashref ); |
445 |
} |
441 |
} |
Lines 455-461
sub _build_languages_arrayref {
Link Here
|
455 |
push @languages_loop, { |
451 |
push @languages_loop, { |
456 |
# this is only use if there is one |
452 |
# this is only use if there is one |
457 |
rfc4646_subtag => @$value[0]->{rfc4646_subtag}, |
453 |
rfc4646_subtag => @$value[0]->{rfc4646_subtag}, |
458 |
native_description => language_get_description($key,$key,'language'), |
|
|
459 |
language => $key, |
454 |
language => $key, |
460 |
sublanguages_loop => $value, |
455 |
sublanguages_loop => $value, |
461 |
plural => $track_language_groups->{$key} >1 ? 1 : 0, |
456 |
plural => $track_language_groups->{$key} >1 ? 1 : 0, |