Bring back the body attributes now that tidy no longer messes them up

Apparently they aren't entirely useless as they prevent
the Docbook mess from inserting other attributes.

diff --git a/doc/source/ldp.dsl.in b/doc/source/ldp.dsl.in
index ff28181..ccbea7d 100644 (file)
--- a/doc/source/ldp.dsl.in
+++ b/doc/source/ldp.dsl.in
@@ -79,6 +79,23 @@
 \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
@@ -308,6 +325,23 @@
 \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