This is the mail archive of the
docbook-apps@lists.oasis-open.org
mailing list .
TOC and LOT entries when %page-number-restart% in use
- To: docbook-apps at lists dot oasis-open dot org
- Subject: DOCBOOK-APPS: TOC and LOT entries when %page-number-restart% in use
- From: Richard Sharpe <sharpe at ns dot aus dot com>
- Date: Tue, 06 Mar 2001 13:24:12 +1000
Hi,
Now that we have %page-number-restart% working properly in JadeTex, there
are problems with TOC and LOT entries. They need to be prefixed with their
section number.
Attached is a patch to dbautoc.dsl (Norm's latest version, it might not
apply to what, say, RedHat is shipping).
I have offered it to Norm, but he hasn't replied as yet, so I offer it here
in return for the help provided in the past and likely needed in the future.
Note, I have added an extra variable to dbparam.dsl,
%chapter-title-page-separate%, which you will have to define as #f for
things to work properly.
That is part of some future enhancements I want to put through.
--- /home/rsharpe/docbook/dsssl/docbook/print/dbautoc.dsl Tue Nov 28 20:34:18 2000
+++ /usr/lib/sgml/stylesheets/nwalsh-modular/print/dbautoc.dsl Tue Mar 6 13:21:55 2001
@@ -77,11 +77,26 @@
(element-label-sosofo tocentry)
(literal (gentext-label-title-sep (gi tocentry)))))
(element-title-sosofo tocentry)))
- (make leader (literal "."))
- (make link
- destination: (node-list-address tocentry)
- (with-mode toc-page-number-mode
- (process-node-list tocentry)))))
+ (if (and (= level 1)
+ %chapter-title-page-separate%
+ %page-number-restart%)
+ (empty-sosofo) ;; Don't need the leader etc then
+ (make sequence
+ (make leader (literal "."))
+ (make link
+ destination: (node-list-address tocentry)
+ (make sequence
+ (if %page-number-restart%
+ (literal
+ (string-append
+ (if (= level 1)
+ (element-label tocentry #t)
+ (substring (element-label tocentry #t)
+ 0 (string-index (element-label tocentry #t) ".")))
+ (gentext-intra-label-sep "_pagenumber")))
+ (empty-sosofo))
+ (with-mode toc-page-number-mode
+ (process-node-list tocentry))))))))
;; Build a TOC starting at nd reaching down depth levels.
;; The optional arguments are used on recursive calls to build-toc
@@ -127,8 +142,15 @@
(make leader (literal "."))
(make link
destination: (node-list-address tocentry)
- (with-mode toc-page-number-mode
- (process-node-list tocentry)))))
+ (make sequence
+ (if %page-number-restart%
+ (make sequence
+ (literal (substring (element-label tocentry #t)
+ 0 (string-index (element-label tocentry #t) "-")))
+ (literal (gentext-intra-label-sep "_pagenumber")))
+ (empty-sosofo))
+ (with-mode toc-page-number-mode
+ (process-node-list tocentry))))))
;; Build a LOT starting at nd for all the lotgi's it contains.
;; The optional arguments are used on recursive calls to build-toc
Regards
-------
Richard Sharpe, sharpe@ns.aus.com
Samba (Team member, www.samba.org), Ethereal (Team member, www.ethereal.com)
Contributing author, SAMS Teach Yourself Samba in 24 Hours
Author, Special Edition, Using Samba