Fix text bugs

modules/fontane/teisimpleprint/teisimplehelpers.xqm

@@ -86,7 +86,7 @@ declare function simpleHelpers:prepare-text($node as text()) as text()? {
             else if(ends-with($node, "⸗") and not(simpleHelpers:keep-hyphen($node))) then
                 text {functx:substring-before-last($node, "⸗") || "@"}
             else
-                $node
+                replace($node, "⸗", "-")
         let $cleared-round-s := replace($cleared-hyphen, "ſ", "s")
         let $cleared-Tironian := replace($cleared-round-s, "⁊c.", "etc.")
 (:        let $normalized := normalize-space($cleared-round-s):)
@@ -108,6 +108,8 @@ declare function simpleHelpers:prepare-text($node as text()) as text()? {
                 text {replace($cleared-Tironian, "@", "")}
             else
                 ()
+    else if(normalize-space($node) = "" and matches($node, " ")) then
+        text{" "}
     else
         ()
 };