diff --git a/modules/fontane/index-processor.xqm b/modules/fontane/index-processor.xqm index e4901c43eacb33a2b4b228f9ef6ff3c5ae32cd82..21a65a6738cad38a2e3d1df5a23209c8f942040c 100644 --- a/modules/fontane/index-processor.xqm +++ b/modules/fontane/index-processor.xqm @@ -14,7 +14,6 @@ import module namespace config="http://textgrid.de/ns/SADE/config" at "../config import module namespace f-misc="http://fontane-nb.dariah.eu/ns/SADE/misc" at "misc.xqm"; import module namespace functx="http://www.functx.com"; - declare namespace foaf="http://xmlns.com/foaf/0.1/"; declare namespace gndo="http://d-nb.info/standards/elementset/gnd#"; declare namespace ore="http://www.openarchives.org/ore/terms/"; @@ -1384,7 +1383,18 @@ else let $date := $work/tei:date let $note := $work/tei:note let $bibl := $work/tei:bibl - let $creator := $work/tei:linkGrp/tei:link[@corresp="http://purl.org/dc/terms/creator"] + let $creator := + ( $work/tei:linkGrp/tei:link[@corresp="http://purl.org/dc/terms/creator"], + if($work/ancestor::tei:list[@type = "Fontane"]) then + (: at this point we fake a tei:link to deal with the implicit creator + relation in case of Theodor Fontane's works. This is necessary to + achieve a reference to Fontane's index entry when having a look at + one of his works on register.html. :) + element tei:link { + attribute corresp {"http://purl.org/dc/terms/creator"}, + attribute target {"#" || $work/@xml:id/string() || " psn:Fontane_Theodor"} + } + else () ) let $translationOf := $work/tei:linkGrp/tei:link[@corresp="http://purl.org/ontology/bibo/#translationOf"] let $formerCurrentLocation := $work/tei:linkGrp/tei:link[@corresp="http://erlangen-crm.org/current/P53_has_former_or_current_location"] let $links := $work/tei:linkGrp/tei:link[@corresp="https://schema.org/mentions"]