documentation/default.dsl

   1 <!DOCTYPE style-sheet PUBLIC "-//James Clark//DTD DSSSL Style Sheet//EN" [
   2 <!ENTITY walsh-style PUBLIC "-//Norman Walsh//DOCUMENT DocBook HTML Stylesheet//EN" CDATA DSSSL>
   3 <!ENTITY cygnus-style SYSTEM "/usr/lib/sgml/stylesheet/dsssl/docbook/cygnus/cygnus-both.dsl" CDATA DSSSL>
   4 ]>
   5
   6 <style-sheet>
   7 <style-specification id="html" use="docbook">
   8 <style-specification-body>
   9
  10 (define %use-id-as-filename% #t)
  11 (define %html-ext% ".html")
  12 (define %html-header-tags% '())
  13
  14 ;;(define %stylesheet% "../../winehq.css")
  15 ;;(define %stylesheet-type% "text/css")
  16
  17 (define %shade-verbatim% #t)
  18 (define %section-autolabel% #t)
  19
  20 ;; Customize the body tag color attributes
  21 (define %body-attr%
  22   (list
  23    (list "BGCOLOR" "#FFFFFF")
  24    (list "TEXT" "#000000")
  25    (list "LINK" "#a50d0d")
  26    (list "VLINK" "#505050")
  27    (list "ALINK" "#a50d0d")))
  28
  29 ;; Change the background color of programlisting and screen, etc.
  30 (define ($shade-verbatim-attr$)
  31   (list
  32    (list "BORDER" "0")
  33    ;(list "BGCOLOR" "#E0E0E0")  ; light grey
  34    (list "BGCOLOR" "#E0D0D0")  ; light grayish red
  35    ;(list "BGCOLOR" "#bc8686")  ; dark rose
  36    ;(list "BGCOLOR" "#FFD39B")  ; burlywood1 (tan)
  37    ;(list "BGCOLOR" "#FFE7BA")  ; wheat1 (light tan)
  38    (list "WIDTH" ($table-width$))))
  39
  40 ;; Customize systemitem element to have different formatting, according
  41 ;; to which class attribute it contains.
  42 (element systemitem
  43   (let ((class (attribute-string (normalize "class"))))
  44     (cond
  45      ((equal? class (normalize "systemname")) ($italic-mono-seq$))
  46      ((equal? class (normalize "constant")) ($mono-seq$))
  47      (else ($charseq$)))))
  48
  49 ;; Okay, this is a little tricky.  By default, it appears that setinfo is
  50 ;; completely turned off (with empty-sosofo).  The setinfo title is extracted
  51 ;; through some other means, so we can ignore it when we process the setinfo
  52 ;; below.
  53
  54 ;; Process setinfo element
  55 (element setinfo (process-children))
  56 ;; Ignore title element -- otherwise it'll appear alongside the releaseinfo
  57 ;; element.  If we add any other elements to setinfo, we'll have to blank them
  58 ;; out here, also.
  59 (element (setinfo title)
  60   (empty-sosofo))
  61 ;; Enclose releaseinfo element in italics
  62 (element (setinfo releaseinfo)
  63 ;  (make element gi: "i"
  64 ;  (process-children)))
  65   (process-children))
  66
  67 </style-specification-body>
  68 </style-specification>
  69
  70 <external-specification id="docbook" document="walsh-style">
  71
  72 </style-sheet>