get rid of <cr><lf> line endings and trailing spaces
authorLee <ler762@users.sourceforge.net>
Tue, 23 Oct 2018 02:56:55 +0000 (22:56 -0400)
committerLee <ler762@users.sourceforge.net>
Tue, 23 Oct 2018 02:56:55 +0000 (22:56 -0400)
run 'dos2unix ldp.dsl.in' and then
vi ldp.dsl.in; :1,$ s/ $//

doc/source/ldp.dsl.in

index ccbea7d..fba0b1d 100644 (file)
-<!DOCTYPE style-sheet PUBLIC "-//James Clark//DTD DSSSL Style Sheet//EN" [\r
-<!ENTITY % html "IGNORE">\r
-<![%html;[\r
-<!ENTITY % print "IGNORE">\r
-<!ENTITY docbook.dsl SYSTEM "@DKPREFIX@/html/docbook.dsl" CDATA dsssl>\r
-]]>\r
-<!ENTITY % print "INCLUDE">\r
-<![%print;[\r
-<!ENTITY docbook.dsl SYSTEM "@DKPREFIX@/print/docbook.dsl" CDATA dsssl>\r
-]]>\r
-]>\r
-\r
-<!--\r
-\r
-;; borrowed from the LDP stylesheet, with modifications, HB.\r
-;; Added support for css 03/20/02, and other mods.\r
-\r
--->\r
-\r
-<style-sheet>\r
-\r
-<style-specification id="print" use="docbook">\r
-<style-specification-body> \r
-\r
-;; ==============================\r
-;; customize the print stylesheet\r
-;; ==============================\r
-;;\r
-;; see http://docbook.sourceforge.net/projects/dsssl/doc/print.html\r
-;;\r
-\r
-(define %indent-screen-lines%\r
-  ;; Indent lines in a 'Screen'?\r
-  #t)\r
-\r
-(define %callout-fancy-bug% \r
-  ;; Use fancy callout bugs?\r
-  #t)\r
-\r
-(define %chap-app-running-heads% \r
-  ;; Generate running headers and footers on chapter-level elements?\r
-  #t)\r
-\r
-(define %chap-app-running-head-autolabel% \r
-  ;; Put chapter labels in running heads?\r
-  #t)\r
-\r
-;; this is necessary because right now jadetex does not understand\r
-;; symbolic entities, whereas things work well with numeric entities.\r
-(declare-characteristic preserve-sdata?\r
-  "UNREGISTERED::James Clark//Characteristic::preserve-sdata?"\r
-  #f)\r
-\r
-;; put the legal notice in a separate file\r
-(define %generate-legalnotice-link%\r
-  #t)\r
-\r
-;; use graphics in admonitions, and have their path be "stylesheet-images"\r
-;; NO: they do not yet look very good\r
-(define %admon-graphics-path%\r
-  "./stylesheet-images/")\r
-\r
-(define %admon-graphics%\r
-  #f)\r
-\r
-(define %funcsynopsis-decoration%\r
-  ;; make funcsynopsis look pretty\r
-  #t)\r
-\r
-;;(define %shade-verbatim%\r
-;;  #t)\r
-\r
-(define %section-autolabel% #t)\r
-  ;; For enumerated sections (1.1, 1.1.1, 1.2, etc.)\r
-  \r
-;; HB changed TOC depth to 3 levels.\r
-(define (toc-depth nd)\r
-  3)\r
-\r
-;; HB added 03/20/02, see dbparam.dsl ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;\r
-\r
-(define %body-attr% \r
-  ;; REFENTRY body-attr\r
-  ;; PURP What attributes should be hung off of BODY?\r
-  ;; DESC\r
-  ;; A list of the BODY attributes that should be generated.\r
-  ;; The format is a list of lists, each interior list contains the\r
-  ;; name and value of a BODY attribute.\r
-  ;; /DESC\r
-  ;; AUTHOR N/A\r
-  ;; /REFENTRY\r
-  (list\r
-   (list "BGCOLOR" "#EEEEEE")\r
-   (list "TEXT" "#000000")\r
-   (list "LINK" "#0000FF")\r
-   (list "VLINK" "#840084")\r
-   (list "ALINK" "#0000FF")))\r
-\r
-(define %stylesheet%\r
-  ;; REFENTRY stylesheet\r
-  ;; PURP Name of the stylesheet to use\r
-  ;; DESC\r
-  ;; The name of the stylesheet to place in the HTML LINK TAG, or '#f' to\r
-  ;; suppress the stylesheet LINK.\r
-  ;; /DESC\r
-  ;; AUTHOR N/A\r
-  ;; /REFENTRY\r
-  "../p_doc.css")\r
-\r
-(define %stylesheet-type%\r
-  ;; REFENTRY stylesheet-type\r
-  ;; PURP The type of the stylesheet to use\r
-  ;; DESC\r
-  ;; The type of the stylesheet to place in the HTML LINK TAG.\r
-  ;; /DESC\r
-  ;; AUTHOR N/A\r
-  ;; /REFENTRY\r
-  "text/css")\r
-\r
-(define %css-liststyle-alist%\r
-  ;; REFENTRY css-liststyle-alist\r
-  ;; PURP Map DocBook OVERRIDE and MARK attributes to CSS\r
-  ;; DESC\r
-  ;; If '%css-decoration%' is turned on then the list-style-type property of\r
-  ;; list items will be set to reflect the list item style selected in the\r
-  ;; DocBook instance.  This associative list maps the style type names used\r
-  ;; in your instance to the appropriate CSS names.  If no mapping exists,\r
-  ;; the name from the instance will be used.\r
-  ;; /DESC\r
-  ;; AUTHOR N/A\r
-  ;; /REFENTRY\r
-  '(("bullet" "disc")\r
-    ("box" "square")))\r
-\r
-(define %css-decoration%\r
-  ;; REFENTRY css-decoration\r
-  ;; PURP Enable CSS decoration of elements\r
-  ;; DESC\r
-  ;; If '%css-decoration%' is turned on then HTML elements produced by the\r
-  ;; stylesheet may be decorated with STYLE attributes.  For example, the\r
-  ;; LI tags produced for list items may include a fragment of CSS in the\r
-  ;; STYLE attribute which sets the CSS property "list-style-type".\r
-  ;; /DESC\r
-  ;; AUTHOR N/A\r
-  ;; /REFENTRY\r
-  #t)\r
-\r
-;; swa1\r
-\r
-(define %generate-part-toc%\r
-  #f)\r
-\r
-(define %generate-article-toc% \r
-  ;; Should a Table of Contents be produced for Articles?\r
-  ;; If true, a Table of Contents will be generated for each 'Article'.\r
-  #t)\r
-\r
-(define %generate-part-toc-on-titlepage%\r
-  ;; Should the Part TOC appear on the Part title page?\r
-  #f)\r
-\r
-;;Do you want a separate page for the title?\r
-(define %generate-article-titlepage-on-separate-page%\r
- #t)\r
-\r
-;;Do you want the article toc on the titlepage or separate?\r
-(define %generate-article-toc-on-titlepage%\r
- #f)\r
-\r
-;;Titlepage Separate?\r
-;; This is the one that makes TOC only on first page!! hal.\r
-(define (chunk-skip-first-element-list)\r
- '())\r
-\r
-(define %body-start-indent%\r
-  ;; Default indent of body text\r
-  2pi)\r
-\r
-(define %para-indent-firstpara%\r
-  ;; First line start-indent for the first paragraph\r
-  0pt)\r
-\r
-;; swa2\r
-\r
-(define %para-indent%\r
-  ;; First line start-indent for paragraphs (other than the first)\r
-  0pt)\r
-\r
-(define %block-start-indent%\r
-  ;; Extra start-indent for block-elements\r
-  2pt)\r
-\r
-;;Define distance between paragraphs\r
-(define %para-sep% \r
- (/ %bf-size% 2.0))\r
-\r
-;; with swa2 no effects\r
-\r
-;; swa3\r
-\r
-;;Define distance between block elements (figures, tables, etc.).\r
-(define %block-sep% \r
- (* %para-sep% 1.0))\r
-;; (* %para-sep% 2.0))\r
-\r
-(define %hyphenation%\r
-  ;; Allow automatic hyphenation?\r
-  #t)\r
-\r
-(define %left-margin% 5pi)\r
-(define %right-margin% 5pi)\r
-(define %top-margin% 5pi)\r
-(define %bottom-margin% 5pi)\r
-(define %footer-margin% 2pi)\r
-(define %header-margin% 2pi)\r
-\r
-(define %line-spacing-factor% 1.3)\r
-  ;; Factor used to calculate leading\r
-  ;; The leading is calculated by multiplying the current font size by the \r
-  ;; '%line-spacing-factor%'. For example, if the font size is 10pt and\r
-  ;; the '%line-spacing-factor%' is 1.1, then the text will be\r
-  ;; printed "10-on-11".\r
-\r
-(define %head-before-factor% \r
-  ;; Factor used to calculate space above a title\r
-  ;; The space before a title is calculated by multiplying the font size\r
-  ;; used in the title by the '%head-before-factor%'.\r
-;;  0.75)\r
-  0.5)\r
-\r
-(define %head-after-factor% \r
-  ;; Factor used to calculate space below a title\r
-  ;; The space after a title is calculated by multiplying the font size used\r
-  ;; in the title by the '%head-after-factor%'.\r
-  0.5)\r
-\r
-(define %input-whitespace-treatment% 'collapse)\r
-\r
-(define ($generate-article-lot-list$)\r
-  ;; Which Lists of Titles should be produced for Articles?\r
-  (list ))\r
-\r
-\r
-</style-specification-body>\r
-</style-specification>\r
-\r
-\r
-<!--\r
-;; ===================================================\r
-;; customize the html stylesheet; borrowed from Cygnus\r
-;; at http://sourceware.cygnus.com/ (cygnus-both.dsl)\r
-;; ===================================================\r
--->\r
-\r
-<style-specification id="html" use="docbook">\r
-<style-specification-body> \r
-\r
-;; this is necessary because right now jadetex does not understand\r
-;; symbolic entities, whereas things work well with numeric entities.\r
-(declare-characteristic preserve-sdata?\r
-  "UNREGISTERED::James Clark//Characteristic::preserve-sdata?"\r
-  #f)\r
-\r
-;; put the legal notice in a separate file\r
-(define %generate-legalnotice-link%\r
-  #t)\r
-\r
-;; use graphics in admonitions, and have their path be "stylesheet-images"\r
-;; NO: they do not yet look very good\r
-(define %admon-graphics-path%\r
-  "./stylesheet-images/")\r
-\r
-(define %admon-graphics%\r
-  #f)\r
-\r
-(define %funcsynopsis-decoration%\r
-  ;; make funcsynopsis look pretty\r
-  #t)\r
-\r
-(define %html-ext%\r
-  ".html")\r
-\r
-(define %generate-article-toc% \r
-  ;; Should a Table of Contents be produced for Articles?\r
-  ;; If true, a Table of Contents will be generated for each 'Article'.\r
-  #t)\r
-\r
-;; HB added next three statements 05/03/02.\r
-;;Do you want a separate page for the title?\r
-(define %generate-article-titlepage-on-separate-page%\r
- #t)\r
-\r
-;;Do you want the article toc on the titlepage or separate?\r
-(define %generate-article-toc-on-titlepage%\r
- #t)\r
-\r
-;;Titlepage Separate?\r
-;; This is the one that makes TOC only on first page!! hal.\r
-(define (chunk-skip-first-element-list)\r
- '())\r
-\r
-(define %root-filename%\r
-  ;; The filename of the root HTML document (e.g, "index").\r
-  "index")\r
-\r
-(define %generate-part-toc%\r
-  #t)\r
-\r
-(define %shade-verbatim%\r
-  #t)\r
-\r
-(define %use-id-as-filename%\r
-  ;; Use ID attributes as name for component HTML files?\r
-  #t)\r
-\r
-(define %graphic-default-extension% \r
-  "gif")\r
-\r
-(define %section-autolabel% #t)\r
-  ;; For enumerated sections (1.1, 1.1.1, 1.2, etc.)\r
-  \r
-;; HB changed TOC depth to 3 levels.\r
-(define (toc-depth nd)\r
-  3)\r
-\r
-;; HB added 03/20/02, see dbparam.dsl ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;\r
-\r
-(define %body-attr% \r
-  ;; REFENTRY body-attr\r
-  ;; PURP What attributes should be hung off of BODY?\r
-  ;; DESC\r
-  ;; A list of the the BODY attributes that should be generated.\r
-  ;; The format is a list of lists, each interior list contains the\r
-  ;; name and value of a BODY attribute.\r
-  ;; /DESC\r
-  ;; AUTHOR N/A\r
-  ;; /REFENTRY\r
-  (list\r
-   (list "BGCOLOR" "#EEEEEE")\r
-   (list "TEXT" "#000000")\r
-   (list "LINK" "#0000FF")\r
-   (list "VLINK" "#840084")\r
-   (list "ALINK" "#0000FF")))\r
-\r
-(define %stylesheet%\r
-  ;; REFENTRY stylesheet\r
-  ;; PURP Name of the stylesheet to use\r
-  ;; DESC\r
-  ;; The name of the stylesheet to place in the HTML LINK TAG, or '#f' to\r
-  ;; suppress the stylesheet LINK.\r
-  ;; /DESC\r
-  ;; AUTHOR N/A\r
-  ;; /REFENTRY\r
-  "../p_doc.css")\r
-\r
-(define %stylesheet-type%\r
-  ;; REFENTRY stylesheet-type\r
-  ;; PURP The type of the stylesheet to use\r
-  ;; DESC\r
-  ;; The type of the stylesheet to place in the HTML LINK TAG.\r
-  ;; /DESC\r
-  ;; AUTHOR N/A\r
-  ;; /REFENTRY\r
-  "text/css")\r
-\r
-(define %css-liststyle-alist%\r
-  ;; REFENTRY css-liststyle-alist\r
-  ;; PURP Map DocBook OVERRIDE and MARK attributes to CSS\r
-  ;; DESC\r
-  ;; If '%css-decoration%' is turned on then the list-style-type property of\r
-  ;; list items will be set to reflect the list item style selected in the\r
-  ;; DocBook instance.  This associative list maps the style type names used\r
-  ;; in your instance to the appropriate CSS names.  If no mapping exists,\r
-  ;; the name from the instance will be used.\r
-  ;; /DESC\r
-  ;; AUTHOR N/A\r
-  ;; /REFENTRY\r
-  '(("bullet" "disc")\r
-    ("box" "square")))\r
-\r
-(define %css-decoration%\r
-  ;; REFENTRY css-decoration\r
-  ;; PURP Enable CSS decoration of elements\r
-  ;; DESC\r
-  ;; If '%css-decoration%' is turned on then HTML elements produced by the\r
-  ;; stylesheet may be decorated with STYLE attributes.  For example, the\r
-  ;; LI tags produced for list items may include a fragment of CSS in the\r
-  ;; STYLE attribute which sets the CSS property "list-style-type".\r
-  ;; /DESC\r
-  ;; AUTHOR N/A\r
-  ;; /REFENTRY\r
-  #t)\r
-\r
-;; HB added 2008-01-19\r
-(define %html-header-tags% \r
-  '(("META" ("HTTP-EQUIV" "Content-Type") ("CONTENT" "text/html;\r
-charset=ISO-8859-1"))))\r
-\r
-</style-specification-body>\r
-</style-specification>\r
-\r
-\r
-<style-specification id="html-notoc" use="html">\r
-<style-specification-body> \r
-\r
-;; ===================================================\r
-;; Vairant without TOC for the Homepage --oes 24/05/02\r
-;; ===================================================\r
-\r
-(define %generate-article-toc% \r
-  ;; Should a Table of Contents be produced for Articles?\r
-  ;; If true, a Table of Contents will be generated for each 'Article'.\r
-  #f)\r
-\r
-</style-specification-body>\r
-</style-specification>\r
-\r
-<external-specification id="docbook" document="docbook.dsl">\r
-\r
-</style-sheet>\r
+<!DOCTYPE style-sheet PUBLIC "-//James Clark//DTD DSSSL Style Sheet//EN" [
+<!ENTITY % html "IGNORE">
+<![%html;[
+<!ENTITY % print "IGNORE">
+<!ENTITY docbook.dsl SYSTEM "@DKPREFIX@/html/docbook.dsl" CDATA dsssl>
+]]>
+<!ENTITY % print "INCLUDE">
+<![%print;[
+<!ENTITY docbook.dsl SYSTEM "@DKPREFIX@/print/docbook.dsl" CDATA dsssl>
+]]>
+]>
+
+<!--
+
+;; borrowed from the LDP stylesheet, with modifications, HB.
+;; Added support for css 03/20/02, and other mods.
+
+-->
+
+<style-sheet>
+
+<style-specification id="print" use="docbook">
+<style-specification-body>
+
+;; ==============================
+;; customize the print stylesheet
+;; ==============================
+;;
+;; see http://docbook.sourceforge.net/projects/dsssl/doc/print.html
+;;
+
+(define %indent-screen-lines%
+  ;; Indent lines in a 'Screen'?
+  #t)
+
+(define %callout-fancy-bug%
+  ;; Use fancy callout bugs?
+  #t)
+
+(define %chap-app-running-heads%
+  ;; Generate running headers and footers on chapter-level elements?
+  #t)
+
+(define %chap-app-running-head-autolabel%
+  ;; Put chapter labels in running heads?
+  #t)
+
+;; this is necessary because right now jadetex does not understand
+;; symbolic entities, whereas things work well with numeric entities.
+(declare-characteristic preserve-sdata?
+  "UNREGISTERED::James Clark//Characteristic::preserve-sdata?"
+  #f)
+
+;; put the legal notice in a separate file
+(define %generate-legalnotice-link%
+  #t)
+
+;; use graphics in admonitions, and have their path be "stylesheet-images"
+;; NO: they do not yet look very good
+(define %admon-graphics-path%
+  "./stylesheet-images/")
+
+(define %admon-graphics%
+  #f)
+
+(define %funcsynopsis-decoration%
+  ;; make funcsynopsis look pretty
+  #t)
+
+;;(define %shade-verbatim%
+;;  #t)
+
+(define %section-autolabel% #t)
+  ;; For enumerated sections (1.1, 1.1.1, 1.2, etc.)
+
+;; HB changed TOC depth to 3 levels.
+(define (toc-depth nd)
+  3)
+
+;; HB added 03/20/02, see dbparam.dsl ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+(define %body-attr%
+  ;; REFENTRY body-attr
+  ;; PURP What attributes should be hung off of BODY?
+  ;; DESC
+  ;; A list of the BODY attributes that should be generated.
+  ;; The format is a list of lists, each interior list contains the
+  ;; name and value of a BODY attribute.
+  ;; /DESC
+  ;; AUTHOR N/A
+  ;; /REFENTRY
+  (list
+   (list "BGCOLOR" "#EEEEEE")
+   (list "TEXT" "#000000")
+   (list "LINK" "#0000FF")
+   (list "VLINK" "#840084")
+   (list "ALINK" "#0000FF")))
+
+(define %stylesheet%
+  ;; REFENTRY stylesheet
+  ;; PURP Name of the stylesheet to use
+  ;; DESC
+  ;; The name of the stylesheet to place in the HTML LINK TAG, or '#f' to
+  ;; suppress the stylesheet LINK.
+  ;; /DESC
+  ;; AUTHOR N/A
+  ;; /REFENTRY
+  "../p_doc.css")
+
+(define %stylesheet-type%
+  ;; REFENTRY stylesheet-type
+  ;; PURP The type of the stylesheet to use
+  ;; DESC
+  ;; The type of the stylesheet to place in the HTML LINK TAG.
+  ;; /DESC
+  ;; AUTHOR N/A
+  ;; /REFENTRY
+  "text/css")
+
+(define %css-liststyle-alist%
+  ;; REFENTRY css-liststyle-alist
+  ;; PURP Map DocBook OVERRIDE and MARK attributes to CSS
+  ;; DESC
+  ;; If '%css-decoration%' is turned on then the list-style-type property of
+  ;; list items will be set to reflect the list item style selected in the
+  ;; DocBook instance.  This associative list maps the style type names used
+  ;; in your instance to the appropriate CSS names.  If no mapping exists,
+  ;; the name from the instance will be used.
+  ;; /DESC
+  ;; AUTHOR N/A
+  ;; /REFENTRY
+  '(("bullet" "disc")
+    ("box" "square")))
+
+(define %css-decoration%
+  ;; REFENTRY css-decoration
+  ;; PURP Enable CSS decoration of elements
+  ;; DESC
+  ;; If '%css-decoration%' is turned on then HTML elements produced by the
+  ;; stylesheet may be decorated with STYLE attributes.  For example, the
+  ;; LI tags produced for list items may include a fragment of CSS in the
+  ;; STYLE attribute which sets the CSS property "list-style-type".
+  ;; /DESC
+  ;; AUTHOR N/A
+  ;; /REFENTRY
+  #t)
+
+;; swa1
+
+(define %generate-part-toc%
+  #f)
+
+(define %generate-article-toc%
+  ;; Should a Table of Contents be produced for Articles?
+  ;; If true, a Table of Contents will be generated for each 'Article'.
+  #t)
+
+(define %generate-part-toc-on-titlepage%
+  ;; Should the Part TOC appear on the Part title page?
+  #f)
+
+;;Do you want a separate page for the title?
+(define %generate-article-titlepage-on-separate-page%
+ #t)
+
+;;Do you want the article toc on the titlepage or separate?
+(define %generate-article-toc-on-titlepage%
+ #f)
+
+;;Titlepage Separate?
+;; This is the one that makes TOC only on first page!! hal.
+(define (chunk-skip-first-element-list)
+ '())
+
+(define %body-start-indent%
+  ;; Default indent of body text
+  2pi)
+
+(define %para-indent-firstpara%
+  ;; First line start-indent for the first paragraph
+  0pt)
+
+;; swa2
+
+(define %para-indent%
+  ;; First line start-indent for paragraphs (other than the first)
+  0pt)
+
+(define %block-start-indent%
+  ;; Extra start-indent for block-elements
+  2pt)
+
+;;Define distance between paragraphs
+(define %para-sep%
+ (/ %bf-size% 2.0))
+
+;; with swa2 no effects
+
+;; swa3
+
+;;Define distance between block elements (figures, tables, etc.).
+(define %block-sep%
+ (* %para-sep% 1.0))
+;; (* %para-sep% 2.0))
+
+(define %hyphenation%
+  ;; Allow automatic hyphenation?
+  #t)
+
+(define %left-margin% 5pi)
+(define %right-margin% 5pi)
+(define %top-margin% 5pi)
+(define %bottom-margin% 5pi)
+(define %footer-margin% 2pi)
+(define %header-margin% 2pi)
+
+(define %line-spacing-factor% 1.3)
+  ;; Factor used to calculate leading
+  ;; The leading is calculated by multiplying the current font size by the
+  ;; '%line-spacing-factor%'. For example, if the font size is 10pt and
+  ;; the '%line-spacing-factor%' is 1.1, then the text will be
+  ;; printed "10-on-11".
+
+(define %head-before-factor%
+  ;; Factor used to calculate space above a title
+  ;; The space before a title is calculated by multiplying the font size
+  ;; used in the title by the '%head-before-factor%'.
+;;  0.75)
+  0.5)
+
+(define %head-after-factor%
+  ;; Factor used to calculate space below a title
+  ;; The space after a title is calculated by multiplying the font size used
+  ;; in the title by the '%head-after-factor%'.
+  0.5)
+
+(define %input-whitespace-treatment% 'collapse)
+
+(define ($generate-article-lot-list$)
+  ;; Which Lists of Titles should be produced for Articles?
+  (list ))
+
+
+</style-specification-body>
+</style-specification>
+
+
+<!--
+;; ===================================================
+;; customize the html stylesheet; borrowed from Cygnus
+;; at http://sourceware.cygnus.com/ (cygnus-both.dsl)
+;; ===================================================
+-->
+
+<style-specification id="html" use="docbook">
+<style-specification-body>
+
+;; this is necessary because right now jadetex does not understand
+;; symbolic entities, whereas things work well with numeric entities.
+(declare-characteristic preserve-sdata?
+  "UNREGISTERED::James Clark//Characteristic::preserve-sdata?"
+  #f)
+
+;; put the legal notice in a separate file
+(define %generate-legalnotice-link%
+  #t)
+
+;; use graphics in admonitions, and have their path be "stylesheet-images"
+;; NO: they do not yet look very good
+(define %admon-graphics-path%
+  "./stylesheet-images/")
+
+(define %admon-graphics%
+  #f)
+
+(define %funcsynopsis-decoration%
+  ;; make funcsynopsis look pretty
+  #t)
+
+(define %html-ext%
+  ".html")
+
+(define %generate-article-toc%
+  ;; Should a Table of Contents be produced for Articles?
+  ;; If true, a Table of Contents will be generated for each 'Article'.
+  #t)
+
+;; HB added next three statements 05/03/02.
+;;Do you want a separate page for the title?
+(define %generate-article-titlepage-on-separate-page%
+ #t)
+
+;;Do you want the article toc on the titlepage or separate?
+(define %generate-article-toc-on-titlepage%
+ #t)
+
+;;Titlepage Separate?
+;; This is the one that makes TOC only on first page!! hal.
+(define (chunk-skip-first-element-list)
+ '())
+
+(define %root-filename%
+  ;; The filename of the root HTML document (e.g, "index").
+  "index")
+
+(define %generate-part-toc%
+  #t)
+
+(define %shade-verbatim%
+  #t)
+
+(define %use-id-as-filename%
+  ;; Use ID attributes as name for component HTML files?
+  #t)
+
+(define %graphic-default-extension%
+  "gif")
+
+(define %section-autolabel% #t)
+  ;; For enumerated sections (1.1, 1.1.1, 1.2, etc.)
+
+;; HB changed TOC depth to 3 levels.
+(define (toc-depth nd)
+  3)
+
+;; HB added 03/20/02, see dbparam.dsl ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+(define %body-attr%
+  ;; REFENTRY body-attr
+  ;; PURP What attributes should be hung off of BODY?
+  ;; DESC
+  ;; A list of the the BODY attributes that should be generated.
+  ;; The format is a list of lists, each interior list contains the
+  ;; name and value of a BODY attribute.
+  ;; /DESC
+  ;; AUTHOR N/A
+  ;; /REFENTRY
+  (list
+   (list "BGCOLOR" "#EEEEEE")
+   (list "TEXT" "#000000")
+   (list "LINK" "#0000FF")
+   (list "VLINK" "#840084")
+   (list "ALINK" "#0000FF")))
+
+(define %stylesheet%
+  ;; REFENTRY stylesheet
+  ;; PURP Name of the stylesheet to use
+  ;; DESC
+  ;; The name of the stylesheet to place in the HTML LINK TAG, or '#f' to
+  ;; suppress the stylesheet LINK.
+  ;; /DESC
+  ;; AUTHOR N/A
+  ;; /REFENTRY
+  "../p_doc.css")
+
+(define %stylesheet-type%
+  ;; REFENTRY stylesheet-type
+  ;; PURP The type of the stylesheet to use
+  ;; DESC
+  ;; The type of the stylesheet to place in the HTML LINK TAG.
+  ;; /DESC
+  ;; AUTHOR N/A
+  ;; /REFENTRY
+  "text/css")
+
+(define %css-liststyle-alist%
+  ;; REFENTRY css-liststyle-alist
+  ;; PURP Map DocBook OVERRIDE and MARK attributes to CSS
+  ;; DESC
+  ;; If '%css-decoration%' is turned on then the list-style-type property of
+  ;; list items will be set to reflect the list item style selected in the
+  ;; DocBook instance.  This associative list maps the style type names used
+  ;; in your instance to the appropriate CSS names.  If no mapping exists,
+  ;; the name from the instance will be used.
+  ;; /DESC
+  ;; AUTHOR N/A
+  ;; /REFENTRY
+  '(("bullet" "disc")
+    ("box" "square")))
+
+(define %css-decoration%
+  ;; REFENTRY css-decoration
+  ;; PURP Enable CSS decoration of elements
+  ;; DESC
+  ;; If '%css-decoration%' is turned on then HTML elements produced by the
+  ;; stylesheet may be decorated with STYLE attributes.  For example, the
+  ;; LI tags produced for list items may include a fragment of CSS in the
+  ;; STYLE attribute which sets the CSS property "list-style-type".
+  ;; /DESC
+  ;; AUTHOR N/A
+  ;; /REFENTRY
+  #t)
+
+;; HB added 2008-01-19
+(define %html-header-tags%
+  '(("META" ("HTTP-EQUIV" "Content-Type") ("CONTENT" "text/html;
+charset=ISO-8859-1"))))
+
+</style-specification-body>
+</style-specification>
+
+
+<style-specification id="html-notoc" use="html">
+<style-specification-body>
+
+;; ===================================================
+;; Vairant without TOC for the Homepage --oes 24/05/02
+;; ===================================================
+
+(define %generate-article-toc%
+  ;; Should a Table of Contents be produced for Articles?
+  ;; If true, a Table of Contents will be generated for each 'Article'.
+  #f)
+
+</style-specification-body>
+</style-specification>
+
+<external-specification id="docbook" document="docbook.dsl">
+
+</style-sheet>