Index: openacs-4/packages/xowiki/tcl/xowiki-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-procs.tcl,v
diff -u -r1.443 -r1.444
--- openacs-4/packages/xowiki/tcl/xowiki-procs.tcl	26 Oct 2011 01:53:04 -0000	1.443
+++ openacs-4/packages/xowiki/tcl/xowiki-procs.tcl	26 Oct 2011 02:56:00 -0000	1.444
@@ -2233,6 +2233,16 @@
     set fileName [my full_file_name]
 
     set f [open $fileName r]; set data [read $f]; close $f 
+
+    # Ugly hack to fight against a problem with tDom: asHTML strips
+    # spaces between a </span> and the following <span>"
+    regsub -all "/span>      <span" $data "/span>\\&nbsp;\\&nbsp;\\&nbsp;\\&nbsp;\\&nbsp;\\&nbsp;<span" data
+    regsub -all "/span>     <span" $data "/span>\\&nbsp;\\&nbsp;\\&nbsp;\\&nbsp;\\&nbsp;<span" data
+    regsub -all "/span>    <span" $data "/span>\\&nbsp;\\&nbsp;\\&nbsp;\\&nbsp;<span" data
+    regsub -all "/span>   <span" $data "/span>\\&nbsp;\\&nbsp;\\&nbsp;<span" data
+    regsub -all "/span>  <span" $data "/span>\\&nbsp;\\&nbsp;<span" data
+    regsub -all "/span> <span" $data "/span>\\&nbsp;<span" data
+
     dom parse -html $data doc 
     $doc documentElement root