This is the mail archive of the
docbook-apps@lists.oasis-open.org
mailing list .
Re: FYI - Slides online for a talk I gave on DocBook XML
- From: Jirka Kosek <jirka at kosek dot cz>
- To: Dan York <dyork at e-smith dot com>
- Cc: docbook-apps at lists dot oasis-open dot org
- Date: Thu, 21 Mar 2002 20:36:33 +0100
- Subject: Re: DOCBOOK-APPS: FYI - Slides online for a talk I gave on DocBook XML
- References: <20020321131855.D25932@e-smith.com><20020321141340.G25932@e-smith.com>
Dan York wrote:
> the link to the XML file. To generate the PDF file, I just generated FO using
> the fo-plain.xsl file found with the other stylesheets, then ran that through
> Fop to get something I really wasn't pleased with, but didn't really care
> about. :-)
If you are interested I created customization for DSSSL stylesheets to
deal with Slides DTD. It gave me better results than provided
fo-plain.xsl. I'm attaching it to e-mail if anybody is currious. You
must change path pointing to base DSSSL print stylesheet in
<!ENTITY docbook.dsl SYSTEM "/src/db/dsssl/print/docbook.dsl" CDATA
DSSSL>
in order to use it.
Jirka
--
-----------------------------------------------------------------
Jirka Kosek
e-mail: jirka@kosek.cz
http://www.kosek.cz
<!DOCTYPE style-sheet PUBLIC "-//James Clark//DTD DSSSL Style Sheet//EN" [
<!ENTITY docbook.dsl SYSTEM "/src/db/dsssl/print/docbook.dsl" CDATA DSSSL>
]>
<style-specification id="docbook-webapp-print" use="docbook">
(define %visual-acuity% "my")
(define %paper-type% "A4")
(define %body-start-indent% 0pi)
(define %verbatim-size-factor% 0.95)
(define %callout-default-col% 70)
(element property ($mono-seq$))
(define %bf-size%
;; Defines the body font size
(case %visual-acuity%
(("tiny") 8pt)
(("normal") 10pt)
(("eleven") 11pt)
(("my") 14pt)
(("presbyopic") 12pt)
(("large-type") 24pt)))
(define %body-font-family% "Verdana")
(define %title-font-family% "Verdana")
(define %graphic-extensions%
;; List of graphic filename extensions
'("eps" "wmf" "epsf" "gif" "tif" "tiff" "jpg" "jpeg" "png"))
(element slides
(make simple-page-sequence
page-n-columns: %page-n-columns%
page-number-format: ($page-number-format$)
use: default-text-style
left-header: ($left-header$)
center-header: (literal "")
right-header: ($right-header$)
;; left-footer: (literal (data (select-elements (children (select-elements (children (current-node)) (normalize "slidesinfo"))) (normalize "title"))))
left-footer: ($left-footer$)
center-footer: ($center-footer$)
right-footer: ($right-footer$)
start-indent: %body-start-indent%
input-whitespace-treatment: 'collapse
quadding: %default-quadding%
(process-children)))
(element slidesinfo
(make sequence
quadding: 'center
(process-children)))
(element (slidesinfo author)
(make paragraph
quadding: 'center
space-before: 96pt
space-after: 96pt
(next-match)))
(element (slidesinfo copyright)
(empty-sosofo))
(element (slidesinfo title)
(let* ((renderas (attribute-string "renderas"))
(hlevel 0)
(hs (HSIZE (- 4 hlevel))))
(make paragraph
font-family-name: %title-font-family%
font-weight: (if (< hlevel 5) 'bold 'medium)
font-posture: (if (< hlevel 5) 'upright 'italic)
font-size: hs
line-spacing: (* hs %line-spacing-factor%)
space-before: (* hs %head-before-factor%)
space-after: (* hs %head-after-factor%)
start-indent: (if (< hlevel 3)
0pt
%body-start-indent%)
first-line-start-indent: 0pt
quadding: 'center
keep-with-next?: #t
(process-children))))
(element (slidesinfo subtitle)
(let* ((renderas (attribute-string "renderas"))
(hlevel 2)
(hs (HSIZE (- 4 hlevel))))
(make paragraph
font-family-name: %title-font-family%
font-weight: (if (< hlevel 5) 'bold 'medium)
font-posture: (if (< hlevel 5) 'upright 'italic)
font-size: hs
line-spacing: (* hs %line-spacing-factor%)
space-before: (* hs %head-before-factor%)
space-after: (* hs %head-after-factor%)
start-indent: (if (< hlevel 3)
0pt
%body-start-indent%)
first-line-start-indent: 0pt
quadding: 'center
keep-with-next?: #t
(process-children))))
(element foil
;; (make paragraph
;; break-before: 'page
(make simple-page-sequence
page-n-columns: %page-n-columns%
page-number-format: ($page-number-format$)
use: default-text-style
left-header: (literal (data (select-elements (children (parent (current-node))) (normalize "title"))))
center-header: ($center-header$)
right-header: (literal (data (select-elements (children (current-node)) (normalize "title"))))
left-footer: (literal (data
(select-elements
(children
(select-elements
(children
(select-elements
(parent
(select-elements
(parent (current-node))
(normalize "section")))
(normalize "slides")))
(normalize "slidesinfo")))
(normalize "title"))))
center-footer: ($center-footer$)
right-footer: ($right-footer$)
start-indent: %body-start-indent%
input-whitespace-treatment: 'collapse
quadding: %default-quadding%
(process-children)))
(element (foil title)
(let* ((renderas (attribute-string "renderas"))
(hlevel 1)
(hs (HSIZE (- 4 hlevel))))
(make paragraph
font-family-name: %title-font-family%
font-weight: (if (< hlevel 5) 'bold 'medium)
font-posture: (if (< hlevel 5) 'upright 'italic)
font-size: hs
line-spacing: (* hs %line-spacing-factor%)
space-before: (* hs %head-before-factor%)
space-after: (* hs %head-after-factor%)
start-indent: (if (< hlevel 3)
0pt
%body-start-indent%)
first-line-start-indent: 0pt
quadding: 'center
keep-with-next?: #t
(process-children))))
(element (foil subtitle)
(let* ((renderas (attribute-string "renderas"))
(hlevel 2)
(hs (HSIZE (- 4 hlevel))))
(make paragraph
font-family-name: %title-font-family%
font-weight: (if (< hlevel 5) 'bold 'medium)
font-posture: (if (< hlevel 5) 'upright 'italic)
font-size: hs
line-spacing: (* hs %line-spacing-factor%)
space-before: (* hs %head-before-factor%)
space-after: (* hs %head-after-factor%)
start-indent: (if (< hlevel 3)
0pt
%body-start-indent%)
first-line-start-indent: 0pt
quadding: 'center
keep-with-next?: #t
(process-children))))
(element section
(process-children))
(element (section title)
(empty-sosofo))
(define (named-formal-objects)
(list (normalize "figure")
(normalize "equation")))
</style-specification>
<external-specification id="docbook" document="docbook.dsl">