73 lines
2.3 KiB
Plaintext
73 lines
2.3 KiB
Plaintext
|
<!DOCTYPE style-sheet PUBLIC "-//James Clark//DTD DSSSL Style Sheet//EN" [
|
||
|
|
<!ENTITY walsh-style PUBLIC "-//Norman Walsh//DOCUMENT DocBook HTML Stylesheet//EN" CDATA DSSSL>
|
||
|
|
<!ENTITY cygnus-style SYSTEM "/usr/lib/sgml/stylesheet/dsssl/docbook/cygnus/cygnus-both.dsl" CDATA DSSSL>
|
||
|
|
]>
|
||
|
|
|
||
|
|
<style-sheet>
|
||
|
|
<style-specification id="html" use="docbook">
|
||
|
|
<style-specification-body>
|
||
|
|
|
||
|
|
(define %use-id-as-filename% #t)
|
||
|
|
(define %html-ext% ".html")
|
||
|
|
(define %html-header-tags% '())
|
||
|
|
|
||
|
|
;;(define %stylesheet% "../../winehq.css")
|
||
|
|
;;(define %stylesheet-type% "text/css")
|
||
|
|
|
||
|
|
(define %shade-verbatim% #t)
|
||
|
|
(define %section-autolabel% #t)
|
||
|
|
|
||
|
|
;; Customize the body tag color attributes
|
||
|
|
(define %body-attr%
|
||
|
|
(list
|
||
|
|
(list "BGCOLOR" "#FFFFFF")
|
||
|
|
(list "TEXT" "#000000")
|
||
|
|
(list "LINK" "#a50d0d")
|
||
|
|
(list "VLINK" "#505050")
|
||
|
|
(list "ALINK" "#a50d0d")))
|
||
|
|
|
||
|
|
;; Change the background color of programlisting and screen, etc.
|
||
|
|
(define ($shade-verbatim-attr$)
|
||
|
|
(list
|
||
|
|
(list "BORDER" "0")
|
||
|
|
;(list "BGCOLOR" "#E0E0E0") ; light grey
|
||
|
|
(list "BGCOLOR" "#E0D0D0") ; light grayish red
|
||
|
|
;(list "BGCOLOR" "#bc8686") ; dark rose
|
||
|
|
;(list "BGCOLOR" "#FFD39B") ; burlywood1 (tan)
|
||
|
|
;(list "BGCOLOR" "#FFE7BA") ; wheat1 (light tan)
|
||
|
|
(list "WIDTH" ($table-width$))))
|
||
|
|
|
||
|
|
;; Customize systemitem element to have different formatting, according
|
||
|
|
;; to which class attribute it contains.
|
||
|
|
(element systemitem
|
||
|
|
(let ((class (attribute-string (normalize "class"))))
|
||
|
|
(cond
|
||
|
|
((equal? class (normalize "systemname")) ($italic-mono-seq$))
|
||
|
|
((equal? class (normalize "constant")) ($mono-seq$))
|
||
|
|
(else ($charseq$)))))
|
||
|
|
|
||
|
|
;; Okay, this is a little tricky. By default, it appears that setinfo is
|
||
|
|
;; completely turned off (with empty-sosofo). The setinfo title is extracted
|
||
|
|
;; through some other means, so we can ignore it when we process the setinfo
|
||
|
|
;; below.
|
||
|
|
|
||
|
|
;; Process setinfo element
|
||
|
|
(element setinfo (process-children))
|
||
|
|
;; Ignore title element -- otherwise it'll appear alongside the releaseinfo
|
||
|
|
;; element. If we add any other elements to setinfo, we'll have to blank them
|
||
|
|
;; out here, also.
|
||
|
|
(element (setinfo title)
|
||
|
|
(empty-sosofo))
|
||
|
|
;; Enclose releaseinfo element in italics
|
||
|
|
(element (setinfo releaseinfo)
|
||
|
|
; (make element gi: "i"
|
||
|
|
; (process-children)))
|
||
|
|
(process-children))
|
||
|
|
|
||
|
|
</style-specification-body>
|
||
|
|
</style-specification>
|
||
|
|
|
||
|
|
<external-specification id="docbook" document="walsh-style">
|
||
|
|
|
||
|
|
</style-sheet>
|