@@ -11,7 +11,7 @@ import module namespace dq="http://exist-db.org/xquery/documentation/search" at
1111
1212declare namespace db5="http://docbook.org/ns/docbook" ;
1313
14- declare variable $docbook:INLINE :=
14+ declare variable $docbook:INLINE :=
1515 ("filename" , "classname" , "methodname" , "option" , "command" , "parameter" , "guimenu" , "guimenuitem" , "guibutton" , "function" , "envar" );
1616
1717(:============================================================================:)
@@ -21,7 +21,7 @@ declare variable $docbook:INLINE :=
2121 : Load a docbook document. If a query was specified, re-run the query on the document
2222 : to get matches highlighted.
2323 :)
24- declare
24+ declare
2525 %public %templates:default("field" , "all" )
2626function docbook:load ($node as node (), $model as map (*), $q as xs:string?, $doc as xs:string?, $field as xs:string) {
2727 let $path := $config:data-root || "/" || $doc
@@ -54,14 +54,14 @@ declare %public function docbook:to-html($node as node(), $model as map(*)) {
5454 : Generate a table of contents.
5555 :)
5656declare %public function docbook:toc ($node as node (), $model as map (*)) {
57- let $root as element () := $model("doc" )
57+ let $root as element () := $model("doc" )
5858 return
5959 <div>
6060 <h3>Contents</h3>
61- {
61+ {
6262 if (namespace-uri ($root) eq "http://docbook.org/ns/docbook" )
6363 then docbook:toc-db5 ($root)
64- else docbook:print-sections-db4 ($root/*/(chapter|section))
64+ else docbook:print-sections-db4 ($root/*/(chapter|section))
6565 }
6666 </div>
6767};
@@ -82,7 +82,7 @@ declare %private function docbook:to-html($nodes as node()*) {
8282
8383declare %private function docbook:toc-db5 ($node as node ()) {
8484 let $uri-xsl := concat ('xmldb:exist://' , $config:app-root, '/modules/xsl/convert-db5-toc.xsl' )
85- let $parameters as element (parameters)? := ()
85+ let $parameters as element (parameters)? := ()
8686 return
8787 transform:transform ($node, $uri-xsl, $parameters)
8888};
@@ -91,7 +91,7 @@ declare %private function docbook:toc-db5($node as node()) {
9191
9292declare %private function docbook:to-html-db5 ($node as node ()) {
9393 let $uri-reative-from-app as xs:string := replace ($config:app-root, '/db/' , '/' )
94- let $uri-relative-from-document as xs:string :=
94+ let $uri-relative-from-document as xs:string :=
9595 concat ($config:data-root-rel, '/' , replace (request:get-parameter ('doc' , ()), '(.*)[/\\][^/\\]+$' , '$1' ))
9696 let $uri-xsl := concat ('xmldb:exist://' , $config:app-root, '/modules/xsl/convert-db5.xsl' )
9797 (: Create a content wrapper so we can include multiple inputs for the transformation: :)
@@ -112,11 +112,11 @@ declare %private function docbook:to-html-db5($node as node()) {
112112 ()
113113 }
114114 </contentswrapper>
115- let $parameters as element (parameters) :=
115+ let $parameters as element (parameters) :=
116116 <parameters>
117117 <param name = "uri-relative-from-app" value = "{$uri-reative-from-app} " />
118118 <param name = "uri-relative-from-document" value = "{$uri-relative-from-document} " />
119- </parameters>
119+ </parameters>
120120 return
121121 transform:transform ($contents, $uri-xsl, $parameters)
122122(:<p>XX</p>:)
@@ -148,7 +148,7 @@ declare %private function docbook:to-html-db4($nodes as node()*) {
148148 for $node in $nodes
149149 return
150150 typeswitch ($node)
151-
151+
152152 (: Main sections: :)
153153 case element (book) return
154154 <article>
@@ -170,7 +170,7 @@ declare %private function docbook:to-html-db4($nodes as node()*) {
170170 <a name = "D{$node/@exist:id} " ></a>
171171 {docbook:process-children ($node)}
172172 </section>
173-
173+
174174 case element (abstract) return
175175 <blockquote>{docbook:process-children ($node)}</blockquote>
176176 case element (title) return
@@ -187,7 +187,7 @@ declare %private function docbook:to-html-db4($nodes as node()*) {
187187 <a name = "D{$node/../@exist:id} " ></a>,
188188 docbook:process-children ($node)
189189 }
190-
190+
191191 case element (para) return
192192 <p>{docbook:process-children ($node)}</p>
193193 case element (emphasis) return
@@ -287,7 +287,7 @@ declare %private function docbook:to-html-db4($nodes as node()*) {
287287 <li>{docbook:process-children ($node)}</li>
288288 case element (tocentry) return
289289 docbook:process-children ($node)
290-
290+
291291 case element (guimenuitem) return
292292 <span class = "guimenuitem" >{docbook:process-children ($node)}</span>
293293 case element (guibutton) return
@@ -296,8 +296,8 @@ declare %private function docbook:to-html-db4($nodes as node()*) {
296296 <span class = "sgmltag" >< {docbook:process-children ($node)}> </span>
297297 case element (exist:match) return
298298 <span class = "hi" >{$node/text ()}</span>
299-
300-
299+
300+
301301 (: Table related: :)
302302 case element (informaltable) return
303303 <table border = "0" cellpadding = "0" cellspacing = "0" >{$node/node ()}</table>
@@ -312,16 +312,16 @@ declare %private function docbook:to-html-db4($nodes as node()*) {
312312 case element (row) return
313313 <tr>{docbook:process-children ($node)}</tr>
314314 case element (entry) return
315- if ($node/ancestor::thead) then
315+ if ($node/ancestor::thead) then
316316 <th>{docbook:process-children ($node)}</th>
317317 else
318- <td>{docbook:process-children ($node)}</td>
318+ <td>{docbook:process-children ($node)}</td>
319319 case element (col) return
320320 <col width = "{$node/@width} " >{docbook:process-children ($node)}</col>
321321 case element (colgroup) return
322322 <colgroup>{docbook:process-children ($node)}</colgroup>
323-
324- (: Defaults/General: :)
323+
324+ (: Defaults/General: :)
325325 case element () return
326326 let $name := local-name ($node)
327327 return
@@ -398,7 +398,7 @@ declare %private function docbook:table($node as node()) {
398398(:----------------------------------------------------------------------------:)
399399
400400declare %private function docbook:code ($elem as element ()) {
401- let $lang :=
401+ let $lang :=
402402 if ($elem//markup) then
403403 "xml"
404404 else if ($elem/@language) then
@@ -446,7 +446,7 @@ declare %private function docbook:get-resource-uri($ref as xs:string) as xs:stri
446446 let $prefix-path := if (starts-with ($ref, '/' ))
447447 then replace ($config:app-root, '/db/' , '/' )
448448 else concat ($config:data-root-rel, '/' , replace (request:get-parameter ('doc' , ()), '(.*)[/\\][^/\\]+$' , '$1' ))
449- return
449+ return
450450 concat ($prefix-path, '/' , $ref)
451451};
452452
0 commit comments