template::util::set_to_vars (public, deprecated)

 template::util::set_to_vars set [ args... ]

Defined in packages/acs-templating/tcl/deprecated-procs.tcl

Deprecated. Invoking this procedure generates a warning.

Declare local variables for set values DEPRECATED: this proc can be replaced with trivial ns_set and plain tcl idioms

Parameters:
set (required)
A reference to an ns_set.
See Also:
  • ns_set

Testcases:
No testcase defined.
Source code:
ad_log_deprecated proc template::util::set_to_vars

    if { [llength $args] == 0 } {

        for { set i 0 } { $i < [ns_set size $set] } { incr i } {
            set key [ns_set key $set $i]
            upvar $key value
            set value [ns_set get $set $key]
        }

    } else {

        foreach key $args {
            upvar $key value
            set value [ns_set get $set $key]
        }
    }
XQL Not present:
Generic, PostgreSQL, Oracle
[ hide source ] | [ make this the default ]
Show another procedure: