template::template_tag_if_concat_params (private)
template::template_tag_if_concat_params params
Defined in packages/acs-templating/tcl/tag-procs.tcl
append all the tags together and then eval as a list to restore quotes
- Parameters:
- params (required)
- Partial Call Graph (max 5 caller/called nodes):
- Testcases:
- No testcase defined.
Source code: set size [ns_set size $params] for { set i 0 } { $i < $size } { incr i } { set key [ns_set key $params $i] set value [ns_set value $params $i] if {$key eq $value} { lappend tokens $key } else { lappend tokens "$key=$value" } } # LARS: The 'eval' statement here breaks if any key or value above contains a semicolon, # since this causes eval to treat whatever comes after the semicolon as a new command. # I'm not sure why we need to eval here at all, there ought to be another solution, # but it's not clear what the intention of below statement is. #set tokens [eval [concat list [join $tokens " "]]] set tokens [join $tokens " "] return $tokensXQL Not present: Generic, PostgreSQL, Oracle