Index: openacs-4/packages/acs-tcl/tcl/text-html-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/text-html-procs.tcl,v diff -u -r1.109.2.42 -r1.109.2.43 --- openacs-4/packages/acs-tcl/tcl/text-html-procs.tcl 4 Dec 2022 11:36:40 -0000 1.109.2.42 +++ openacs-4/packages/acs-tcl/tcl/text-html-procs.tcl 22 Dec 2022 02:39:02 -0000 1.109.2.43 @@ -431,7 +431,7 @@ # Convert _single_ CRLF's to
's to preserve line breaks # unless inside
 elements.
         #
-        set parsed [ns_parsehtml $text]
+        set parsed [ns_parsehtml -- $text]
         set out ""
         set inside_pre 0
         foreach token $parsed {
@@ -506,7 +506,7 @@
     }
 
     set depth 0
-    set parseListElements [ns_parsehtml -onlytags $html_fragment]
+    set parseListElements [ns_parsehtml -onlytags -- $html_fragment]
     foreach parseListElement $parseListElements {
         set tag [string tolower [lindex $parseListElement 0]]
         if {$tag in $close_tags} {