Lines 391-400
sub _build_languages_arrayref {
Link Here
|
391 |
# group this language, key by langtag |
391 |
# group this language, key by langtag |
392 |
$language_subtags_hashref->{'sublanguage_current'} = 1 if $translated_language eq $current_language; |
392 |
$language_subtags_hashref->{'sublanguage_current'} = 1 if $translated_language eq $current_language; |
393 |
$language_subtags_hashref->{'rfc4646_subtag'} = $translated_language; |
393 |
$language_subtags_hashref->{'rfc4646_subtag'} = $translated_language; |
394 |
$language_subtags_hashref->{'native_description'} = language_get_description($language_subtags_hashref->{language},$language_subtags_hashref->{language},'language'); |
|
|
395 |
$language_subtags_hashref->{'script_description'} = language_get_description($language_subtags_hashref->{script},$language_subtags_hashref->{'language'},'script'); |
396 |
$language_subtags_hashref->{'region_description'} = language_get_description($language_subtags_hashref->{region},$language_subtags_hashref->{'language'},'region'); |
397 |
$language_subtags_hashref->{'variant_description'} = language_get_description($language_subtags_hashref->{variant},$language_subtags_hashref->{'language'},'variant'); |
398 |
$track_language_groups->{$language_subtags_hashref->{'language'}}++; |
394 |
$track_language_groups->{$language_subtags_hashref->{'language'}}++; |
399 |
push ( @{ $language_groups->{$language_subtags_hashref->{language}} }, $language_subtags_hashref ); |
395 |
push ( @{ $language_groups->{$language_subtags_hashref->{language}} }, $language_subtags_hashref ); |
400 |
} |
396 |
} |
Lines 410-416
sub _build_languages_arrayref {
Link Here
|
410 |
push @languages_loop, { |
406 |
push @languages_loop, { |
411 |
# this is only use if there is one |
407 |
# this is only use if there is one |
412 |
rfc4646_subtag => @$value[0]->{rfc4646_subtag}, |
408 |
rfc4646_subtag => @$value[0]->{rfc4646_subtag}, |
413 |
native_description => language_get_description($key,$key,'language'), |
|
|
414 |
language => $key, |
409 |
language => $key, |
415 |
sublanguages_loop => $value, |
410 |
sublanguages_loop => $value, |
416 |
plural => $track_language_groups->{$key} >1 ? 1 : 0, |
411 |
plural => $track_language_groups->{$key} >1 ? 1 : 0, |