(backend-doc-node)
(all-scheme-functions-doc)
(make <texi-node>
- #:name "Indexes"
+ #:appendix #t
+ #:name "Indices"
#:text "
-@unnumberedsec Concept index
+@appendixsec Concept index
@printindex cp
-@unnumberedsec Function index
+@appendixsec Function index
@printindex fn
(srfi srfi-1))
(define-class <texi-node> ()
+ (appendix #:init-value #f #:accessor appendix? #:init-keyword #:appendix)
(children #:init-value '() #:accessor node-children #:init-keyword #:children)
(text #:init-value "" #:accessor node-text #:init-keyword #:text)
(name #:init-value "" #:accessor node-name #:init-keyword #:name)
"\n@node "
(node-name node)
"\n\n"
- (if appendix
+ (if (or appendix (appendix? node))
(texi-appendix-section-command level)
(texi-section-command level))
" "