--- a/software/eXist/webapp/mpdl/text/all.xql	Fri Mar 11 13:33:26 2011 +0100
+++ b/software/eXist/webapp/mpdl/text/all.xql	Fri Mar 11 13:34:02 2011 +0100
@@ -9,6 +9,8 @@
 declare namespace local = "http://www.mpiwg-berlin.mpg.de/ns/mpdl/local";
 
 declare namespace echo="http://www.mpiwg-berlin.mpg.de/ns/echo/1.0/";
+declare namespace TEI="http://www.tei-c.org/ns/1.0";
+
 declare namespace dcterms="http://purl.org/dc/terms";
 
 declare function mpdl-text:insertNodeIdAttribute($element as element()) {
@@ -41,6 +43,8 @@
     then $document/archimedes/text
     else if ($mpdlCollectionName = 'echo') 
     then $document/echo:echo/echo:text 
+    else if ($mpdlCollectionName = 'tei') 
+    then $document/TEI:TEI/TEI:text 
     else $document/archimedes/text
   let $from := ($pn * $pageSize) - $pageSize + 1
   let $to := $pn * $pageSize
@@ -131,16 +135,22 @@
     then $document//echo:figure
     else if ($docBase = 'archimedes' and $queryType = 'figures') 
     then $document//figure
+    else if ($docBase = 'tei' and $queryType = 'figures') 
+    then $document//TEI:figure
     else ()
   let $tocEntriesAllTmp := 
     for $entry at $pos in $tocEntriesAll
       let $pb := 
         if ($docBase = 'echo')
         then $entry/preceding::echo:pb[1]
+        else if ($docBase = 'tei')
+        then $entry/preceding::TEI:pb[1]
         else $entry/preceding::pb[1]
       let $pageNum := 
         if ($docBase = 'echo')
         then count($pb/preceding::echo:pb) + 1
+        else if ($docBase = 'tei')
+        then count($pb/preceding::TEI:pb) + 1
         else count($pb/preceding::pb) + 1
       let $level := 
         if ($queryType = 'toc')
@@ -206,12 +216,16 @@
     then $document/archimedes/info
     else if ($docbase = 'echo')
     then $document/echo:echo/echo:metadata
+    else if ($docbase = 'tei')
+    then $document/TEI:TEI/TEI:teiHeader
     else ''
   let $documentIdentifier :=
     if ($docbase = 'archimedes')
     then $metadata/locator
     else if ($docbase = 'echo')
     then $metadata/dcterms:identifier
+    else if ($docbase = 'tei')
+    then $metadata/TEI:fileDesc/TEI:publicationStmt/TEI:idno
     else $metadata/dcterms:identifier
   let $echoDocIdentifier := 
     if ($documentIdentifier != '') 
@@ -231,6 +245,8 @@
     then concat("/permanent/archimedes/", $documentName)
     else if ($docbase = 'echo')
     then concat("/permanent/library/", $echoDocIdentifier)
+    else if ($docbase = 'tei')
+    then $documentIdentifier
     else ''
   let $imagesDocDirectoryIndexMetaUrl  := concat($nausikaaURLTexter, "?fn=", $imagesDocDirectory, "/index.meta")
   let $digilibAvailable := mpdldoc:check-uri($imagesDocDirectoryIndexMetaUrl, 2000)