jimw            Mon Dec 17 16:38:40 2001 EDT

  Modified files:              
    /phpdoc     html-common.dsl 
  Log:
  format editors just like authors in html versions.
  
Index: phpdoc/html-common.dsl
diff -u phpdoc/html-common.dsl:1.18 phpdoc/html-common.dsl:1.19
--- phpdoc/html-common.dsl:1.18 Sun Nov 18 18:28:22 2001
+++ phpdoc/html-common.dsl      Mon Dec 17 16:38:40 2001
@@ -1,6 +1,6 @@
 ;; -*- Scheme -*-
 ;;
-;; $Id: html-common.dsl,v 1.18 2001/11/18 23:28:22 hholzgra Exp $
+;; $Id: html-common.dsl,v 1.19 2001/12/17 21:38:40 jimw Exp $
 ;;
 
 ;; Returns the depth of the auto-generated TOC (table of
@@ -333,7 +333,19 @@
               attributes: (list (list "CLASS" (gi)))
               (literal author-name))
         (process-node-list author-affil))))
-    )
+
+  (element editor
+    (let ((editor-name (author-string)))
+      (make sequence
+        (if (first-sibling?)
+            (make element gi: "H2"
+                  attributes: (list (list "CLASS" "EDITEDBY"))
+                  (literal (gentext-edited-by)))
+            (empty-sosofo))
+        (make element gi: "DIV"
+              attributes: (list (list "CLASS" (gi)))
+              (literal editor-name)))))
+)
 
 
 ;; Put version info where the refname part in the refnamediv is


Reply via email to