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

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 $tokens

XQL Not present:

Generic, PostgreSQL, Oracle