|
Lines 249-255
sub getLanguages {
Link Here
|
| 249 |
$language_subtag_registry->{language_description} = $language_descriptions->{description}; |
249 |
$language_subtag_registry->{language_description} = $language_descriptions->{description}; |
| 250 |
} |
250 |
} |
| 251 |
} |
251 |
} |
| 252 |
if ( !$language_list || index ( $language_list, $language_subtag_registry->{ iso639_2_code } ) >= 0) { |
252 |
# Do not push unless valid iso639-2 code |
|
|
253 |
if ( $language_subtag_registry->{ iso639_2_code } and ( !$language_list || index ( $language_list, $language_subtag_registry->{ iso639_2_code } ) >= 0) ) { |
| 253 |
push @languages_loop, $language_subtag_registry; |
254 |
push @languages_loop, $language_subtag_registry; |
| 254 |
} |
255 |
} |
| 255 |
} |
256 |
} |
| 256 |
- |
|
|