ad_page_contract_filter_proc_word (public)

 ad_page_contract_filter_proc_word name value_varname

Defined in packages/acs-tcl/tcl/tcl-documentation-procs.tcl

Checks whether the value is a Tcl word, i.e. it consists of just characters, digits and underscore.

Parameters:

name
value_varname

Author:

Gustaf Neumann

Created:

24 June 2015

Partial Call Graph (max 5 caller/called nodes):

Testcases:

ad_page_contract_filters

Source code:

upvar $value_varname value


    if {[regexp {^\w+$} $value]} {
        return 1
    }
    ad_complain [_ acs-tcl.lt_name_is_not_a_word]
    return 0

XQL Not present:

Generic, PostgreSQL, Oracle