xowf::test::question_names_from_input_form (private)

 xowf::test::question_names_from_input_form d

Defined in packages/xowf/tcl/test/test-helper-procs.tcl

Parse html reply and extract question names (test-item-convention) from the form content.

Parameters:
d (required)
Returns:
list of question names

Partial Call Graph (max 5 caller/called nodes):
%3 acs::test::dom_html acs::test::dom_html (public) xowiki::test::get_content xowiki::test::get_content (public) xowf::test::question_names_from_input_form xowf::test::question_names_from_input_form xowf::test::question_names_from_input_form->acs::test::dom_html xowf::test::question_names_from_input_form->xowiki::test::get_content

Testcases:
No testcase defined.
Source code:
        acs::test::dom_html root [::xowiki::test::get_content $d] {
            set input_names [$root selectNodes {//input/@name}]
            lappend input_names {*}[$root selectNodes {//textarea/@name}]
            ns_log notice "TEXTAREAS [$root selectNodes {//textarea/@name}]"
        }
        ns_log notice "input_names <$input_names>"
        return [lmap input_name [lsort -unique $input_names] {
            set name [lindex [split [lindex $input_name 1] .] 0]
            if {[string match "__*" $name]} continue
            ns_log notice "... check '$name'"
            if {[string range $name end end] ne "_"} continue
            string range $name 0 end-1
        }]
XQL Not present:
Generic, PostgreSQL, Oracle
[ hide source ] | [ make this the default ]
Show another procedure: