|
From: Matzinger, E. <Edg...@at...> - 2004-10-21 11:38:37
|
ls,
can someone explain to me why this stylesheet does not show/process
a rule in the header? It does not show up in the generated RTF file.
Command used: openjade -t rtf -d mystyle.dsl sdg.sgml
Openjade version: 1.3.3-pre1 (on both cygwin and HP-UX)
1.3.2 (only on HP-UX)
OpenSP version: 1.5.1 (on both cygwin and HP-UX)
HP-UX compiler: gcc 3.4.2 statically linked.
--------------------------8< mystyle.dsl -----------------------------
<!DOCTYPE style-sheet PUBLIC "-//James Clark//DTD DSSSL Style Sheet//EN" =
[
<!ENTITY dbstyle PUBLIC "-//Norman Walsh//DOCUMENT DocBook Print=20
Stylesheet//EN" CDATA DSSSL>
]>
<style-sheet>
<style-specification use=3D"docbook">
<style-specification-body>
;; your own defs
(define %paper-type% "A4")
(define (first-page-inner-header gi)
(make sequence
(literal "HP-UX Competence SDG")
; (make rule
; orientation: 'horizontal
; length: %text-width%
; line-thickness: 0.5pt)
))
(define (first-page-outer-header gi)
(make sequence
(make external-graphic
scale: 0.5
entity-system-id: "logo.jpg"
notation-system-id: "JPG"
display?: #f
space-after: 0pt
position-point-y: -12pt)
(make rule
; orientation: 'horizontal
orientation: 'escapement
display-alignment: 'center
escapement-space-before: 0pt
escapement-space-after: 0pt
length: 29.7cm
layer: 1
line-thickness: 5pt)
))
(define (page-inner-header gi)
(make sequence
(literal "HP-UX Competence SDG")
; (make rule
; orientation: 'horizontal
; length: %text-width%
; line-thickness: 0.5pt)
))
(define (page-outer-header gi)
(make sequence
(make external-graphic
scale: 0.5
entity-system-id: "logo.jpg"
notation-system-id: "JPG"
display?: #f
space-after: 0pt
position-point-y: -12pt)
(make rule
orientation: 'escapement
display-alignment: 'center
escapement-space-before: 0pt
escapement-space-after: 0pt
length: 29.7cm
layer: 1
line-thickness: 0.5pt)
))
(define (page-center-header gi)
(make sequence
(literal "For internal use")
))
(define (first-page-center-header gi)
(make sequence
(literal "For internal use")
))
(define (first-page-inner-footer gi)
(make sequence
(make rule
orientation: 'horizontal
length: %text-width%
space-before: 0pt
space-after: 0pt
layer: 1
line-thickness: 0.5pt)
(literal "Atos Origin")
))
(define (first-page-center-footer gi)
(let* (
(bookinf
(select-elements (children (sgml-root-element)) (normalize =
"bookinfo")))
(bookdate
(select-elements (children bookinf) (normalize "pubdate")))
)
(with-mode hf-mode
(make sequence
(process-node-list bookdate)
)
)
)
)
(define (first-page-outer-footer gi)
(make sequence
($page-number-header-footer$)
)
)
(define (page-inner-footer gi)
(make sequence
(make rule
orientation: 'horizontal
length: %text-width%
space-before: 0pt
space-after: 0pt
layer: 1
line-thickness: 0.5pt)
(literal "Atos Origin")
))
(define (page-center-footer gi)
(let* (
(bookinf
(select-elements (children (sgml-root-element)) (normalize =
"bookinfo")))
(bookdate
(select-elements (children bookinf) (normalize "pubdate")))
)
(with-mode hf-mode
(make sequence
(process-node-list bookdate))
)
)
)
(define (page-outer-footer gi)
(make sequence
($page-number-header-footer$)
)
)
</style-specification-body>
</style-specification>
<external-specification id=3D"docbook" document=3D"dbstyle">
</style-sheet>
--------------------------8< mystyle.dsl -----------------------------
Above stylesheets shows all the necessary items (text and logo) in the
header. Just not the rule.
MTIA, cu l8r, Edgar.
--=20
|\ /| : : Addr: Origin B.V.
/ | \/ | : Edgar R. Matzinger : t.a.v. E.R. =
Matzinger
/ | | : : building: VA-178
\ /| /\| : : Groenewoudseweg 1
\/ / \ : Atos Origin : 5621 BA Eindhoven
\ /\ / : MS DS OSS UNIX : The Netherlands
\/ |\/ : :
| : :
Disclaimer: Any comments, opinions made are mine, etc ...
|