Index: openacs-4/packages/acs-templating/tcl/util-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/util-procs.tcl,v diff -u -r1.26 -r1.26.2.1 --- openacs-4/packages/acs-templating/tcl/util-procs.tcl 12 Apr 2013 16:12:57 -0000 1.26 +++ openacs-4/packages/acs-templating/tcl/util-procs.tcl 13 Sep 2013 12:02:23 -0000 1.26.2.1 @@ -595,15 +595,13 @@ ns_set put [ns_conn outputheaders] "Set-Cookie" $cookie } -ad_proc -public template::util::quote_html { +ad_proc -deprecated -public template::util::quote_html { html } { Quote possible HTML tags in the contents of the html parameter. } { - regsub -all \" [ns_quotehtml $html] \\"\; html - - return $html + return [ad_quotehtml $html] } ad_proc -public template::util::multirow_quote_html {multirow_ref column_ref} { @@ -619,7 +617,7 @@ for { set i 1 } { $i <= $rowcount } { incr i} { upvar $multirow_ref:$i arr - set arr($column_ref) [template::util::quote_html [set arr($column_ref)]] + set arr($column_ref) [ad_quotehtml [set arr($column_ref)]] } }