Merge branch 'release/v1.2'

CHANGELOG.md

@@ -6,6 +6,10 @@ and this project adheres to [Semantic Versioning](http://semver.org/spec/v2.0.0.
 
 ## [Unreleased]
 
+## v1.2 - 2019-06-28
+## Added
+- added mechanism for spaced out text
+
 ## v1.1.1 - 2019-02-27
 ### Fixed
 - fix bug in tei:row handling

build.properties

 project.name=http://bdn-edition.de/intermediate_format-develop
-project.version=1.1.1
+project.version=1.2
 project.title=BdN Intermediate Format
 project.abbrev=interformat-develop
 project.processorversion=4.6.0

modules/intermediate_format/preprocessing.xqm

-xquery version "3.0";
+xquery version "3.1";
 (:~
  : PREPROCESSING Module ("pre", "http://bdn.edition.de/intermediate_format/preprocessing")
  : *******************************************************************************************
@@ -261,13 +261,26 @@ declare function pre:preprocessing
             )
 
             case element(hi) return (
-            if($node[@rend = 'right-aligned' or @rend = 'center-aligned']) then(
+            if($node[@rend = ('right-aligned', 'center-aligned')]) then(
                     element {'aligned'} {
                         $node/@*,
                         pre:preprocessing($node/node(), $replace-whitespace)
                     }
                 )
-                else (
+            else if($node[@rend = 'spaced-out']) then
+                element {'hi'} {
+                    $node/@*,
+                    let $text := $node/text()
+                    let $str-length := string-length($text)
+                    let $spaced-out :=
+                        for $iii in 1 to $str-length return
+                            if(not($iii = $str-length)) then
+                                (substring($text, $iii, 1), "@")
+                            else
+                                substring($text, $iii, 1)
+                    return string-join($spaced-out, '')
+                }
+            else (
                     pre:default-element( $node, pre:preprocessing($node/node(), $replace-whitespace) )
                 )
             )
@@ -319,3 +332,12 @@ as element(editorial-notes) {
             pre:default-element($editorial-note, pre:preprocessing($editorial-note/node(), $replace-whitespace))
     }
 };
+
+declare function pre:tokenize-by-character($text as text()) as xs:string* {
+    for $iii in 1 to string-length($text) return
+        substring($text, $iii, 1)
+};
+
+declare function pre:add-spaces-between-chars($characters as xs:string*) as xs:string {
+    string-join($characters, '@')
+};
\ No newline at end of file