lang::util::record_message_lookup (private)

 lang::util::record_message_lookup message_key

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

Record a message lookup in translator mode. In translator mode we collect all message lookups at the bottom of the page for translation.

Parameters:
message_key
Author:
Peter Marklund

Partial Call Graph (max 5 caller/called nodes):
%3 lang::message::lookup lang::message::lookup (public) lang::util::record_message_lookup lang::util::record_message_lookup lang::message::lookup->lang::util::record_message_lookup ad_conn ad_conn (public) lang::util::record_message_lookup->ad_conn

Testcases:
No testcase defined.
Source code:
    global __lang_message_lookups

    # Only makes sense to offer translation list if we're not in en_US locale
    if { [ad_conn locale] ne "en_US" } {
        if { ![info exists __lang_message_lookups] } {
            lappend __lang_message_lookups $message_key
        } elseif {$message_key ni $__lang_message_lookups} {
            lappend __lang_message_lookups $message_key
        }
    }
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: