kein Leerzeichen bei Namensumkehrung, wenn am Ende ' d’'

xquery/str.xqm

@@ -44,8 +44,9 @@ declare function str:join-path-elements($segs as xs:string*) as xs:string {
 declare function str:printFornameSurname($name as xs:string?) as xs:string? {
     let $clearName := str:normalize-space($name)
     return
-        if(functx:number-of-matches($clearName, ',') eq 1)
-        then normalize-space(string-join(reverse(tokenize($clearName, ',')), ' '))
+        if(functx:number-of-matches($clearName, ',') eq 1) then
+            if(ends-with($clearName, ' d’')) then normalize-space(string-join(reverse(tokenize($clearName, ','))))
+            else normalize-space(string-join(reverse(tokenize($clearName, ',')), ' '))
         else $clearName
 };