Index: openacs-4/packages/acs-templating/tcl/test/data-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/test/Attic/data-procs.tcl,v diff -u -r1.1.2.14 -r1.1.2.15 --- openacs-4/packages/acs-templating/tcl/test/data-procs.tcl 28 Jun 2021 11:17:27 -0000 1.1.2.14 +++ openacs-4/packages/acs-templating/tcl/test/data-procs.tcl 30 Jun 2021 06:33:02 -0000 1.1.2.15 @@ -238,6 +238,29 @@ production_safe } -procs { template::data::validate + template::data::validate::search +} validate_search { + Test validation for search data types + + @author Héctor Romojaro + @creation-date 28 June 2021 +} { + # + # Currently, all submitted search strings to the validator are valid... + # + set search_true {"" "my search" "lalala"} + set message "" + foreach value $search_true { + aa_true "Is $value a search?" [template::data::validate search value message] + } +} + +aa_register_case -cats { + api + smoke + production_safe +} -procs { + template::data::validate template::data::validate::keyword } validate_keyword { Test validation for keyword data types