xowiki::locales (private)

 xowiki::locales

Defined in packages/xowiki/tcl/xowiki-form-procs.tcl

Partial Call Graph (max 5 caller/called nodes):
%3 test_xowiki_test_cases xowiki_test_cases (test xowiki) xowiki::locales xowiki::locales test_xowiki_test_cases->xowiki::locales lang::conn::locale lang::conn::locale (public) xowiki::locales->lang::conn::locale lang::system::get_locales lang::system::get_locales (public) xowiki::locales->lang::system::get_locales Class ::xowiki::formfield::localized_text Class ::xowiki::formfield::localized_text (public) Class ::xowiki::formfield::localized_text->xowiki::locales

Testcases:
xowiki_test_cases
Source code:
    set locales [lang::system::get_locales]
    if {[ns_conn isconnected]} {
      #
      # Reorder the locales and put the connection locale to the front
      # in case we have a connection
      #
      set defpos [lsearch -exact $locales [lang::conn::locale]]
      set locales [linsert [lreplace $locales $defpos $defpos] 0  [lang::conn::locale]]
    }
    foreach l $locales {lappend lpairs [list $l $l]}
    return $lpairs
XQL Not present:
Generic, PostgreSQL, Oracle
[ hide source ] | [ make this the default ]
Show another procedure: