lang::util::iso6392_from_locale (public)

 lang::util::iso6392_from_locale -locale locale

Defined in packages/acs-lang/tcl/lang-util-procs.tcl

Returns the ISO-639-2 code for a locale.

Switches:
-locale
(required)
Locale to get the language ISO-639-2 code for
Returns:
The ISO-639-2 language code for the locale

Partial Call Graph (max 5 caller/called nodes):
%3 test_test_get_locales test_get_locales (test acs-lang) lang::util::iso6392_from_locale lang::util::iso6392_from_locale test_test_get_locales->lang::util::iso6392_from_locale lang::util::iso6392_from_language lang::util::iso6392_from_language (public) lang::util::iso6392_from_locale->lang::util::iso6392_from_language

Testcases:
test_get_locales
Source code:

    # Don't use string range since 3 digits languages may be used
    set language [lindex [split $locale "_"] 0]
    return [lang::util::iso6392_from_language -language $language]
XQL Not present:
PostgreSQL, Oracle
Generic XQL file:
packages/acs-lang/tcl/lang-util-procs.xql

[ hide source ] | [ make this the default ]
Show another procedure: