Index: openacs-4/packages/acs-templating/tcl/widget-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/widget-procs.tcl,v diff -u -r1.63.2.16 -r1.63.2.17 --- openacs-4/packages/acs-templating/tcl/widget-procs.tcl 2 Sep 2021 16:40:51 -0000 1.63.2.16 +++ openacs-4/packages/acs-templating/tcl/widget-procs.tcl 24 Jan 2022 16:35:47 -0000 1.63.2.17 @@ -361,14 +361,10 @@ upvar $element_reference element - if { [info exists element(value)] } { - if { [info exists element(noquote)] } { - return "$element(value)" - } else { - return "[ns_quotehtml $element(value)][input hidden element $tag_attributes]" - } + if { [info exists element(noquote)] } { + return $element(value) } else { - return [input hidden element $tag_attributes] + return [ns_quotehtml $element(value)] } }