Index: openacs-4/packages/acs-tcl/tcl/test/html-conversion-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/test/html-conversion-procs.tcl,v
diff -u -r1.10.8.2 -r1.10.8.3
--- openacs-4/packages/acs-tcl/tcl/test/html-conversion-procs.tcl	18 Sep 2015 07:33:49 -0000	1.10.8.2
+++ openacs-4/packages/acs-tcl/tcl/test/html-conversion-procs.tcl	26 Sep 2015 11:25:23 -0000	1.10.8.3
@@ -191,10 +191,10 @@
     Test if it quote and unquote html
 } {
     #quote html
-    set html "\"<&text>\""
+    set html {"<&text>"}
     aa_log "Unquote html=$html"
     set result [ns_quotehtml $html]
-    aa_true "Quoute html=$result" [string equal "&quot;&lt;&amp;text&gt;&quot;" $result]
+    aa_true "Quoute html=$result" [string equal "&#34;&lt;&amp;text&gt;&#34;" $result]
 
     #unquote html
     set html $result