: Newest version of "Genealogie der Moral. Erstdruck E 40"
:)
declare variable $config:newest-ed := config:get-newest-doc-with-title('Zur Genealogie der Moral. Erstdruck E 40');
(:~
: Newest version of "Zur Genealogie der Moral. Druckmanuskript D 20"
:)
declare variable $config:newest-dm := config:get-newest-doc-with-title('Zur Genealogie der Moral. Druckmanuskript D 20');
(:~
: Newest version of "Zur Genealogie der Moral. Druckmanuskript D 20"
:)
declare variable $config:newest-annex := config:get-newest-doc-with-title('Zur Genealogie der Moral. Anhang: Dokumente zur Entstehungs- und Druckgeschichte');
declare function config:get-newest-doc-with-title($title as xs:string) as document-node() {
let $docs := for $doc in collection($config:data-root)//tei:titleStmt/tei:title
where $doc/text() = $title
order by xmldb:last-modified($config:data-root, util:document-name($doc)) descending
return root($doc)
return if (count($docs) gt 0) then ($docs[1]) else ()
};
(:~
: List of ODD files which are used internally only, i.e. not for displaying information