- Publicity: Public Only All
filter-procs.tcl
Procedures in this file
- ad_page_contract_filter_proc_aa_test_category (public)
- ad_page_contract_filter_proc_aa_test_view_by (public)
Detailed information
ad_page_contract_filter_proc_aa_test_category (public)
ad_page_contract_filter_proc_aa_test_category name value_varname
Checks whether a category value has is valid.
- Parameters:
- name
value_varname
- Partial Call Graph (max 5 caller/called nodes):
- Testcases:
- aa_page_contract_filters
ad_page_contract_filter_proc_aa_test_view_by (public)
ad_page_contract_filter_proc_aa_test_view_by name value_varname
Checks whether a view_by value has a value of "testcase", "package" or "category"
- Parameters:
- name
value_varname
- Partial Call Graph (max 5 caller/called nodes):
- Testcases:
- aa_page_contract_filters
Content File Source
ad_page_contract_filter aa_test_view_by { name value } { Checks whether a view_by value has a value of "testcase", "package" or "category" } { if {$value ni {testcase package}} { ad_complain "Invalid view_by name" return 0 } return 1 } ad_page_contract_filter aa_test_category { name value } { Checks whether a category value has is valid. } { if {$value ni [nsv_get aa_test categories]} { ad_complain "$value is not a valid acs-automated-testing testcase category" return 0 } return 1 } # Local variables: # mode: tcl # tcl-indent-level: 4 # indent-tabs-mode: nil # End: