ptr in apparatus are followedba a whitespace

modules/intermediate_format/preprocessing.xqm

@@ -118,7 +118,10 @@ declare function pre:default-element
             or self::foreign or self::choice or self::milestone or self::persName
             or self::choice or self::index or self::seg or self::ptr]
             and not($node[self::index])
-            or ($node[self::milestone]) and $following-node[self::text()])
+            or ($node[self::milestone]) and $following-node[self::text()]
+            (: ptr in the critical apparatus produce the siglum '[E]' which should
+            be followed by a whitespace :)
+            or ($node[self::ptr] and $node/ancestor::rdg[@type = ("v", "pp", "pt")]))
             then
                 attribute {"break-after"}{"yes"}
             else ()),
@@ -205,9 +208,7 @@ declare function pre:preprocessing
             )
 
             case element(note) return (
-                if ( $node[@type != "editorial-commentary"] or $node[ not(@type) ] ) then (
-                    pre:default-element( $node, pre:preprocessing($node/node(), $replace-whitespace) )
-                ) else ( )
+                pre:default-element( $node, pre:preprocessing($node/node(), $replace-whitespace) )
             )
 
             case element(pb) return (