From: rrt <unknown>
Date: Mon, 24 Jan 2000 13:05:01 +0000 (+0000)
Subject: [project @ 2000-01-24 13:05:01 by rrt]
X-Git-Tag: Approximately_9120_patches~5231
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=e5f1291c49dd97911c8e0696f87e16b517380e77

[project @ 2000-01-24 13:05:01 by rrt]
Stylesheet used for processing SGML. Initially it's identical to the Cygnus
DocBook Tools stylesheet, with %section-autonumber% set to true for HTML, so
that all sections are numbered.
---

diff --git a/docs/fptools-both.dsl b/docs/fptools-both.dsl
new file mode 100644
index 0000000..f2f8fe0
--- /dev/null
+++ b/docs/fptools-both.dsl
@@ -0,0 +1,133 @@
+<!DOCTYPE style-sheet PUBLIC "-//James Clark//DTD DSSSL Style Sheet//EN" [
+<!ENTITY % html "IGNORE">
+<![%html;[
+<!ENTITY % print "IGNORE">
+<!ENTITY docbook.dsl SYSTEM "/usr/lib/sgml/stylesheets/nwalsh-modular/html/docbook.dsl" CDATA dsssl>
+]]>
+<!ENTITY % print "INCLUDE">
+<![%print;[
+<!ENTITY docbook.dsl SYSTEM "/usr/lib/sgml/stylesheets/nwalsh-modular/print/docbook.dsl" CDATA dsssl>
+]]>
+]>
+
+<!-- This is (or was) the standard Cygnus DocBook tools stylesheet
+
+Options added:
+
+%section-autolabel%: true
+
+-->
+
+
+<style-sheet>
+
+<style-specification id="print" use="docbook">
+<style-specification-body> 
+
+;; ====================
+;; customize the print stylesheet
+;; ====================
+
+;; make funcsynopsis look pretty
+(define %funcsynopsis-decoration%
+  ;; Decorate elements of a FuncSynopsis?
+  #t)
+
+;; use graphics in admonitions, and have their path be "."
+;; NO: we are not yet ready to use gifs in TeX and so forth
+(define %admon-graphics-path%
+  "./")
+(define %admon-graphics%
+  #f)
+
+;; 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)
+(define %two-side% #t)
+
+(define %section-autolabel% 
+  ;; Are sections enumerated?
+  #t)
+;; (define %title-font-family% 
+;;   ;; The font family used in titles
+;;   "Ariel")
+(define %visual-acuity%
+  ;; General measure of document text size
+  ;; "presbyopic"
+  ;; "large-type"
+  "presbyopic")
+
+(define %generate-part-toc% #t)
+
+;; (define %block-start-indent% 10pt)
+
+(define %graphic-default-extension% "eps")
+
+
+</style-specification-body>
+</style-specification>
+
+<!--
+;; ====================
+;; customize the html stylesheet
+;; ====================
+-->
+<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)
+
+;; make funcsynopsis look pretty
+(define %funcsynopsis-decoration%
+  ;; Decorate elements of a FuncSynopsis?
+  #t)
+
+(define %html-ext% ".html")
+(define %body-attr%
+  ;; What attributes should be hung off of BODY?
+  '())
+;;  (list
+;;   (list "BGCOLOR" "#FFFFFF")
+;;   (list "TEXT" "#000000")))
+
+(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% #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)
+
+</style-specification-body>
+</style-specification>
+
+<external-specification id="docbook" document="docbook.dsl">
+
+</style-sheet>