Fixing the transform of the classified text into string with serialized spans for named entities

Author: lcahlander

src/main/js/frontend/src/App.css

@@ -54,3 +54,15 @@ body {
   width: 100%;
 }
 
+.i-misc {
+  color: green;
+}
+
+.i-per {
+  color: red;
+}
+
+.i-loc {
+  color: blue;
+}
+

src/main/js/frontend/src/NERContext.tsx

@@ -104,7 +104,7 @@ function NERContext() {
             <Row>
                 <div>Results</div>
                 <hr/>
-                <div>{namedEntities}</div>
+                <div dangerouslySetInnerHTML={{__html: namedEntities}}></div>
                 <div>{
                     nerError.code ?
                         <>

src/main/xar-resources/modules/rest-api.xqm

@@ -150,10 +150,11 @@ declare
 function api:query-text-as-json($content as xs:string) as map(*) {
     let $postBody := fn:parse-json(util:base64-decode($content))
     let $properties := ner:properties-from-language($postBody?language)
+    let $classified := ner:classify($postBody?text, $properties)
     return
         try {
     map {
-        'text' : ner:stringify(ner:classify($postBody?text, $properties))
+        'text' : ner:stringify($classified)
     }
         } catch * {
             map {

src/main/xquery/ner-module.xqm

@@ -21,9 +21,9 @@ declare namespace map = "http://www.w3.org/2005/xpath-functions/map";
  : @param $match The match text for a snippet that contains highlighted text
  : @return A string with highlight spans encoded within the string
  :)
-declare function ner:stringify($match as node()) as xs:string {
+declare function ner:stringify($match) as xs:string {
     fn:string-join(
-        for $text-or-highlight in $match/node()
+        for $text-or-highlight in $match
         return
         if ($text-or-highlight instance of element())
         then
@@ -97,18 +97,14 @@ function ner:classify-node($node as node(), $language as xs:string) as node() {
  :)
 declare
 function ner:properties-from-language($language as xs:string) as map(*) {
-    try {
-        switch ($language)
-            case "en" return fn:json-doc("/db/apps/stanford-nlp/data/StanfordCoreNLP-english.json")
-            case "ar" return fn:json-doc("/db/apps/stanford-nlp/data/StanfordCoreNLP-arabic.json")
-            case "es" return fn:json-doc("/db/apps/stanford-nlp/data/StanfordCoreNLP-spanish.json")
-            case "fr" return fn:json-doc("/db/apps/stanford-nlp/data/StanfordCoreNLP-french.json")
-            case "zh" return fn:json-doc("/db/apps/stanford-nlp/data/StanfordCoreNLP-chinese.json")
-            case "de" return fn:json-doc("/db/apps/stanford-nlp/data/StanfordCoreNLP-german.json")
-            default return fn:json-doc("/db/apps/stanford-nlp/data/StanfordCoreNLP-english.json")
-    } catch * {
-        fn:json-doc("/db/apps/stanford-nlp/data/StanfordCoreNLP-english.json")
-    }
+    switch ($language)
+        case "en" return fn:json-doc("/db/apps/stanford-nlp/data/StanfordCoreNLP-english.json")
+        case "ar" return fn:json-doc("/db/apps/stanford-nlp/data/StanfordCoreNLP-arabic.json")
+        case "es" return fn:json-doc("/db/apps/stanford-nlp/data/StanfordCoreNLP-spanish.json")
+        case "fr" return fn:json-doc("/db/apps/stanford-nlp/data/StanfordCoreNLP-french.json")
+        case "zh" return fn:json-doc("/db/apps/stanford-nlp/data/StanfordCoreNLP-chinese.json")
+        case "de" return fn:json-doc("/db/apps/stanford-nlp/data/StanfordCoreNLP-german.json")
+        default return fn:json-doc("/db/apps/stanford-nlp/data/StanfordCoreNLP-english.json")
 };
 
 (:~