Improve whitespace handling

modules/fontane/teisimpleprint/tei2teisimple.xqm

@@ -317,6 +317,14 @@ declare function fontaneSimple:transform($nodes as node()*, $uri as xs:string) a
             if($node/@type = "highlighted"
             and simpleHelpers:is-hand-contemporary($node/@hand)) then
                 $node
+            else if($node/following::node()[1][self::text()]) then
+                let $first-char := $node/following::node()[1][self::text()]
+                    => substring(1, 1)
+                return
+                    if(matches($first-char, "[\s]")) then
+                        (fontaneSimple:transform($node/node(), $uri), text{" "})
+                    else
+                        fontaneSimple:transform($node/node(), $uri)
             else
                 fontaneSimple:transform($node/node(), $uri)