Revision b088faa2430f519e8b5eeeabcdf96a3b8854639a authored by Lou Burnard on 18 December 2011, 19:08:43 UTC, committed by Lou Burnard on 18 December 2011, 19:08:43 UTC
1 parent ed48956
modules.xql
declare namespace tei="http://www.tei-c.org/ns/1.0";
declare namespace rng="http://relaxng.org/ns/structure/1.0";
<teiModulesList>
{
for $t in collection("/db/TEI")//tei:moduleSpec[not(@type='decls')]
let $lang := request:get-parameter("lang", "en")
let $what:=$t/@ident
let $Desc:=
if ($t/tei:desc[@xml:lang=$lang]) then
$t/tei:desc[@xml:lang=$lang]
else
$t/tei:desc[not(@xml:lang)][1]
let $chapter:=$t/ancestor::tei:div[last()]/@xml:id
order by $t/@ident
return
<teiModule>
<moduleName>{data($what)}</moduleName>
<moduleDesc>{data($Desc)}</moduleDesc>
<moduleChapter>{data($chapter)}</moduleChapter>
</teiModule>
}
</teiModulesList>
Computing file changes ...
