tony2001 Mon May 17 10:38:50 2004 EDT
Modified files:
/phpdoc/dsssl/docbook/html dblink.dsl
Log:
update dblink.dsl to support xref to varlistentry
http://cvs.php.net/diff.php/phpdoc/dsssl/docbook/html/dblink.dsl?r1=1.1&r2=1.2&ty=u
Index: phpdoc/dsssl/docbook/html/dblink.dsl
diff -u phpdoc/dsssl/docbook/html/dblink.dsl:1.1
phpdoc/dsssl/docbook/html/dblink.dsl:1.2
--- phpdoc/dsssl/docbook/html/dblink.dsl:1.1 Sat Jul 20 11:30:10 2002
+++ phpdoc/dsssl/docbook/html/dblink.dsl Mon May 17 10:38:50 2004
@@ -1,7 +1,7 @@
-;; $Id: dblink.dsl,v 1.1 2002/07/20 15:30:10 goba Exp $
+;; $Id: dblink.dsl,v 1.2 2004/05/17 14:38:50 tony2001 Exp $
;;
;; This file is part of the Modular DocBook Stylesheet distribution.
-;; See ../README or http://www.berkshire.net/~norm/dsssl/
+;; See ../README or http://docbook.sourceforge.net/projects/dsssl/
;;
;; ========================= LINKS AND ANCHORS ==========================
@@ -226,6 +226,8 @@
(if (equal? (gi (parent target)) (normalize "orderedlist"))
(literal (orderedlist-listitem-label-recursive target))
(error (string-append "XRef to LISTITEM only supported in
ORDEREDLISTs"))))
+ ((equal? (gi target) (normalize "varlistentry"))
+ (xref-varlistentry target))
((equal? (gi target) (normalize "question"))
;; questions and answers are (yet another) special case
(make sequence
@@ -309,6 +311,12 @@
xsosofo)
xsosofo))))
+(define (xref-varlistentry target)
+ (let ((terms (select-elements (children target)
+ (normalize "term"))))
+ (with-mode xref-varlistentry-mode
+ (process-node-list (node-list-first terms)))))
+
(define (xref-glossentry target)
(let ((glossterms (select-elements (children target)
(normalize "glossterm"))))
@@ -408,6 +416,10 @@
(element refentrytitle
(process-children-trim)))
+(mode xref-varlistentry-mode
+ (element term
+ ($italic-seq$)))
+
(mode xref-glossentry-mode
(element glossterm
($italic-seq$)))
