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 1XQL Not present: Generic, PostgreSQL, Oracle