Two notes/questions:

 - have you tested that the upgraded stuff works?
 - why do you modify the sheets? we used to use the original
   sheets with our customizations, since people can use their
   local sheet copies as well

It would have been nice to discuss the upgrade first.

Goba


Antony Dovgal írta:
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$)))


Reply via email to