lang::system::get_locales (public)

 lang::system::get_locales [ -all ]

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

Return all locales defined in the system. Per default only the enabled locales are returned. When the optional flag "-all" is specified, all defined locales are returned. This value is cached per thread and needs currently a server restart, when the system locales are changed.

Switches:

-all (optional, boolean)

Author:

Peter Marklund

Testcases:

test_get_locales, xowiki_test_cases

Source code:

    return [acs::per_thread_cache eval -key acs-lang.system_get_locales-$all_p {
        if {$all_p} {
            db_list select_defined_system_locales { select locale from ad_locales }
        } else {
            db_list select_enabled_system_locales {
                select locale
                from   ad_locales
                where  enabled_p = 't'
            }
        }
    }]

XQL Not present:

PostgreSQL, Oracle

Generic XQL file:

packages/acs-lang/tcl/locale-procs.xql