From 7244355a2dd1a1153409faca435c84bee718d78f Mon Sep 17 00:00:00 2001
From: mrodzis <weidling@sub.uni-goettingen.de>
Date: Fri, 8 Mar 2019 13:46:42 +0100
Subject: [PATCH] Minor fixes

---
 modules/intermediate_format/preprocessing.xqm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/modules/intermediate_format/preprocessing.xqm b/modules/intermediate_format/preprocessing.xqm
index 03a0cd4..4525f0f 100644
--- a/modules/intermediate_format/preprocessing.xqm
+++ b/modules/intermediate_format/preprocessing.xqm
@@ -115,7 +115,7 @@ declare function pre:default-element
             (if($following-node[matches(., "[\s\n\r\t]") and normalize-space(.) = ""]
             and $following-sibling[self::ref or self::app or self::hi or self::bibl
             or self::foreign or self::choice or self::milestone or self::persName
-            or self::choice or self::index or self::seg or self::ptr]
+            or self::choice or self::index or self::seg or self::ptr or self::docAuthor]
             and not($node[self::index])
             or ($node[self::milestone]) and $following-node[self::text()]
             (: ptr in the critical apparatus produce the siglum '[E]' which should
-- 
GitLab