dams            Fri Jul 20 14:05:03 2001 EDT

  Modified files:              
    /phpdoc     html-common.dsl 
  Log:
  Adding new format for FAQ.(question are much better in bold).
  
Index: phpdoc/html-common.dsl
diff -u phpdoc/html-common.dsl:1.12 phpdoc/html-common.dsl:1.13
--- phpdoc/html-common.dsl:1.12 Wed Jul 11 18:11:12 2001
+++ phpdoc/html-common.dsl      Fri Jul 20 14:05:03 2001
@@ -1,6 +1,6 @@
 ;; -*- Scheme -*-
 ;;
-;; $Id: html-common.dsl,v 1.12 2001/07/11 22:11:12 jeroen Exp $
+;; $Id: html-common.dsl,v 1.13 2001/07/20 18:05:03 dams Exp $
 ;;
 
 ;; Returns the depth of the auto-generated TOC (table of contents) that
@@ -343,5 +343,20 @@
     )
   )
 
+(element question
+  (let* ((chlist   (children (current-node)))
+         (firstch  (node-list-first chlist))
+         (restch   (node-list-rest chlist)))
+    (make element gi: "B"
+    (make element gi: "DIV"
+          attributes: (list (list "CLASS" (gi)))
+          (make element gi: "P"
+                (make element gi: "A"
+                      attributes: (list (list "NAME" (element-id)))
+                      (empty-sosofo))
+                (make element gi: "B"
+                      (literal (question-answer-label (current-node)) " "))
+                (process-node-list (children firstch)))
+          (process-node-list restch))))   )          
 
 ;; vim: ts=2 sw=2 et


Reply via email to