export_ns_set_value variable { form " " }What it does:
looks for variable in the given form ns_set and returns value="foo" if it exists otherwise returns empty string.Defined in: /web/philip/tcl/ticket-defs.tcluses ns_conn form by default.
Source code:
if {[empty_string_p $form]} {
set form [ns_conn form]
}
if {![empty_string_p $form]} {
set i [ns_set find $form $variable]
if { $i > -1 } {
return "value=\"[philg_quote_double_quotes [ns_set value $form $i]]\""
}
}
return {}