CVS update: phpdoc
| From: | jim | Date: | Sat, 19 Jun 1999 20:21:06 +0000 |
| Subject: | CVS update: phpdoc | ||
| Groups: | php.dev | ||
| Request: | Send a blank email to php-dev+get-7158@lists.php.net to get a copy of this message | ||
Date: Saturday June 19, 1999 @ 16:21
Author: jim
Update of /repository/phpdoc
In directory php:/tmp/cvs-serv8786
Modified Files:
html-common.dsl
Log Message:
Make authors be less big by default.
Index: phpdoc/html-common.dsl
diff -u phpdoc/html-common.dsl:1.1.1.1 phpdoc/html-common.dsl:1.2
--- phpdoc/html-common.dsl:1.1.1.1 Sun Jun 6 14:50:25 1999
+++ phpdoc/html-common.dsl Sat Jun 19 16:21:04 1999
@@ -1,6 +1,6 @@
;; -*- Scheme -*-
;;
-;; $Id: html-common.dsl,v 1.1.1.1 1999/06/06 18:50:25 sas Exp $
+;; $Id: html-common.dsl,v 1.2 1999/06/19 20:21:04 jim Exp $
;;
;; Returns the depth of the auto-generated TOC (table of contents) that
@@ -71,3 +71,18 @@
(make element gi: "TR"
(make element gi: "TD"
($formal-object$))))))
+
+(mode book-titlepage-recto-mode
+ (element AUTHORGROUP
+ (process-children))
+
+ (element AUTHOR
+ (let ((author-name (author-string))
+ (author-affil (select-elements (children (current-node))
+ (normalize "affiliation"))))
+ (make sequence
+ (make element gi: "DIV"
+ attributes: (list (list "CLASS" (gi)))
+ (literal author-name))
+ (process-node-list author-affil))))
+)