Mercurial > hg > mpdl-group

comparison software/eXist/webapp/mpdl/interface/page-fragment.xql @ 15:e99964f390e4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
diverse Fehlerbehebungen
author Josef Willenborg <jwillenborg@mpiwg-berlin.mpg.de>
date Mon, 29 Aug 2011 17:40:19 +0200
parents 469d927b9ca7
children 7e883ce72fec
comparison
equal deleted inserted replaced
14:5df60f24e997 15:e99964f390e4
20 20
21 let $reqPN := number(request:get-parameter("pn", "-1")) 21 let $reqPN := number(request:get-parameter("pn", "-1"))
22 let $reqPF := request:get-parameter("pf", "") 22 let $reqPF := request:get-parameter("pf", "")
23 let $reqSN := number(request:get-parameter("sn", "-1")) 23 let $reqSN := number(request:get-parameter("sn", "-1"))
24 let $xPointer := request:get-parameter("xpointer", "") 24 let $xPointer := request:get-parameter("xpointer", "")
25 let $highlightElement := request:get-parameter("highlightElement", "")
26 let $highlightElementPos := number(request:get-parameter("highlightElementPos", "-1"))
25 let $highlightQuery := request:get-parameter("highlightQuery", "") 27 let $highlightQuery := request:get-parameter("highlightQuery", "")
26 let $regCharNorm := request:get-parameter("characterNormalization", "") 28 let $regCharNorm := request:get-parameter("characterNormalization", "")
27 let $tmpCharNorm := string-join($regCharNorm, ',') 29 let $tmpCharNorm := string-join($regCharNorm, ',')
28 let $charNorm := 30 let $charNorm :=
29 if($tmpCharNorm = "regPlusNorm") 31 if($tmpCharNorm = "regPlusNorm")
230 else if ($mode = "textPollux") 232 else if ($mode = "textPollux")
231 then mpdltext:dictionarize($pageFragmentNormalized, $language) 233 then mpdltext:dictionarize($pageFragmentNormalized, $language)
232 else () 234 else ()
233 let $returnPageFragmentTmp := util:parse($retPageFragment) (: returns a valid xml document for that string :) 235 let $returnPageFragmentTmp := util:parse($retPageFragment) (: returns a valid xml document for that string :)
234 236
235 let $externalElementsTmpTmp := mpdltext:externalObject("read", "element", concat("<object uid=&quot;joe&quot; documentId=&quot;", $mpdlDocUri, "&quot; xpointer=&quot;", "#xpointer(id(", "'page", $pn, "'", "))&quot;></object>")) 237 let $externalElementsTmpTmp := mpdltext:externalObject("read", "element", concat("<object documentId=&quot;", $mpdlDocUri, "&quot; xpointer=&quot;", "id(", "'page", $pn, "'", ")&quot;></object>"))
236 let $externalElementsTmp := 238 let $externalElementsTmp :=
237 if(not($externalElementsTmpTmp = "")) 239 if(not($externalElementsTmpTmp = ""))
238 then util:parse($externalElementsTmpTmp) 240 then util:parse($externalElementsTmpTmp)
239 else () 241 else ()
240 let $externalElements := $externalElementsTmp/result/object 242 let $externalElements := $externalElementsTmp/result/object
353 <number>{$pn}</number> 355 <number>{$pn}</number>
354 <header>{$pageHeader}</header> 356 <header>{$pageHeader}</header>
355 <number-orig>{$pageNumberOrig}</number-orig> 357 <number-orig>{$pageNumberOrig}</number-orig>
356 <number-orig-norm>{$pageNumberOrigNorm}</number-orig-norm> 358 <number-orig-norm>{$pageNumberOrigNorm}</number-orig-norm>
357 <sentence-number>{$sn}</sentence-number> 359 <sentence-number>{$sn}</sentence-number>
360 <highlightElement>{$highlightElement}</highlightElement>
361 <highlightElementPos>{$highlightElementPos}</highlightElementPos>
358 <digilib-available>{$digilibAvailable}</digilib-available> 362 <digilib-available>{$digilibAvailable}</digilib-available>
359 <image-available>{$imageIsAvailable}</image-available> 363 <image-available>{$imageIsAvailable}</image-available>
360 <image-file-name>{$imageFileName}</image-file-name> 364 <image-file-name>{$imageFileName}</image-file-name>
361 {$imageEcho} 365 {$imageEcho}
362 {$imageScaler} 366 {$imageScaler}