Index: openacs-4/packages/acs-tcl/tcl/xml-2-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/xml-2-procs.tcl,v
diff -u -r1.5.2.2 -r1.5.2.3
--- openacs-4/packages/acs-tcl/tcl/xml-2-procs.tcl	28 Oct 2020 15:39:19 -0000	1.5.2.2
+++ openacs-4/packages/acs-tcl/tcl/xml-2-procs.tcl	1 Feb 2021 10:51:09 -0000	1.5.2.3
@@ -330,7 +330,7 @@
 #	As above
 
 proc xml::zapWhite data {
-    regsub -all "\[ \t\r\n\]+" $data { } data
+    regsub -all -- "\[ \t\r\n\]+" $data { } data
     return $data
 }