diff options
Diffstat (limited to 'html/dbmsgset.dsl')
-rw-r--r-- | html/dbmsgset.dsl | 42 |
1 files changed, 42 insertions, 0 deletions
diff --git a/html/dbmsgset.dsl b/html/dbmsgset.dsl new file mode 100644 index 0000000..6f6fb6e --- /dev/null +++ b/html/dbmsgset.dsl @@ -0,0 +1,42 @@ +;; $Id: dbmsgset.dsl,v 1.2 2003/01/15 08:24:13 adicarlo Exp $ +;; +;; This file is part of the Modular DocBook Stylesheet distribution. +;; See ../README or http://docbook.sourceforge.net/projects/dsssl/ +;; + +;; ======================== ERROR MESSAGES (ETC.) ======================= + +(element msgset (process-children)) + +(element msgentry ($block-container$)) + +(element simplemsgentry ($block-container$)) + +(element msg ($block-container$)) + +(element msgmain (process-children)) + +(element msgsub + (process-children)) + +(element msgrel (empty-sosofo)) + +(element msgtext (process-children)) + +(element msginfo ($indent-para-container$)) + +(define ($genhead-para$ headtext) + (make element gi: "P" + (make element gi: "B" + (literal + (string-append headtext ": "))) + (process-children))) + +(element msglevel ($genhead-para$ (gentext-element-name (current-node)))) +(element msgorig ($genhead-para$ (gentext-element-name (current-node)))) +(element msgaud ($genhead-para$ (gentext-element-name (current-node)))) + +(element msgexplan ($indent-para-container$)) +(element (msgexplan title) ($runinhead$)) +(element (msgexplan para) (make sequence (process-children))) + |