From a9925f644a5f8d1443c71ab4f3fc7fa3649521f9 Mon Sep 17 00:00:00 2001
From: Peter Stadler <stadlerpeter@yahoo.fr>
Date: Mon, 28 Aug 2017 16:19:22 +0200
Subject: [PATCH] only process child elements (no other (whitespace) nodes) of
 `tei:subst` when outputting plain text

---
 modules/wega-util.xqm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/modules/wega-util.xqm b/modules/wega-util.xqm
index cf8bea150..8fda05274 100644
--- a/modules/wega-util.xqm
+++ b/modules/wega-util.xqm
@@ -369,6 +369,7 @@ declare function wega-util:txtFromTEI($nodes as node()*) as xs:string* {
         	if($node/@cert) then ($node/child::node() ! wega-util:txtFromTEI(.), '(?)') 
         	else $node/child::node() ! wega-util:txtFromTEI(.)
         case element(tei:del) return ()
+        case element(tei:subst) return $node/child::element() ! wega-util:txtFromTEI(.)
         case element(tei:note) return ()
         case element(tei:lb) return 
             if($node[@type='inWord']) then ()