-
Notifications
You must be signed in to change notification settings - Fork 1
/
Copy pathgbfdb2tex.dsl
113 lines (84 loc) · 2.15 KB
/
gbfdb2tex.dsl
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
<!DOCTYPE style-sheet PUBLIC "-//James Clark//DTD DSSSL Style Sheet//EN" [
<!-- Extension to DSSSL Stylesheet for GBF DocBook -->
<!-- Customizes and define how to process extensions of GBF DocBook -->
<!ENTITY % html "IGNORE">
<![%html;[
<!ENTITY % print "IGNORE">
<!ENTITY docbook.dsl SYSTEM "docbook.dsl" CDATA dsssl>
]]>
<!ENTITY % print "INCLUDE">
<![%print;[
<!ENTITY docbook.dsl SYSTEM "docbook.dsl" CDATA dsssl>
]]>
]>
<style-sheet>
<style-specification use="docbook">
<style-specification-body>
;; HTML:
<![%html;[
(define %footnotes-at-end%
;; Should footnotes appear at the end of HTML pages?
#t)
(define %html-ext%
;; Default extension for HTML output files
".html")
(define %root-filename%
;; Name for the root HTML document
"index")
<!-- Words of Jesus -->
(element fr
(make element gi: "B"
(process-children)))
]]>
;; printing:
<![%print;[
(define (article-titlepage-recto-elements)
(list (normalize "title")
(normalize "subtitle")
(normalize "corpauthor")
(normalize "authorgroup")
(normalize "author")
(normalize "edition")
(normalize "pubdate")
(normalize "legalnotice")
(normalize "revhistory")
(normalize "abstract")))
(define bop-footnotes
;; Make "bottom-of-page" footnotes?
#t)
<!-- Using -V tex-backend when calling openjade
(define tex-backend
#t) -->
(define %graphic-default-extension%
;; Default extension for graphic FILEREFs
"ps")
(element anchor
(empty-sosofo))
(define %generate-article-titlepage%
;; Should an article title page be produced?
#t)
(define %article-titlepage-legalnotice%
;; Legal notice in article
#t)
(define %ss-size-factor%
0.5)
(define %ss-shift-factor%
0.5)
<!-- (define %page-n-columns% 2) -->
<!-- Words of Jesus -->
(element fr ($bold-seq$))
]]>
;; both:
(define %chapter-autolabel%
;; Are chapters enumerated?
#f)
(define %generate-book-toc%
;; Sin tabla de contenido
#f)
(define $generate-chapter-toc$
;; Sin tabla de contenido en capitulo
(lambda () #f))
</style-specification-body>
</style-specification>
<external-specification id="docbook" document="docbook.dsl">
</style-sheet>