ad_page_contract_filter_proc_email (public)

 ad_page_contract_filter_proc_email name value_varname

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

Checks whether the value is a valid email address (stolen from philg_email_valid_p)

Parameters:

name
value_varname

Authors:

Philip Greenspun <philip@mit.edu>

Randy Beggs <randyb@arsdigita.com>

Created:

22 August 2000

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

Testcases:

ad_page_contract_filters

Source code:

upvar $value_varname value

    set valid_p [util_email_valid_p $value]
    if { !$valid_p } {
        ad_complain [_ acs-tcl.lt_name_does_not_appear_]
        return 0
    }
    return 1

XQL Not present:

Generic, PostgreSQL, Oracle