Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
Skip to content

Commit faa14ac

Browse files
committed
doc: Remove obsolete set element DSSSL customizations
We don't use set elements (collection of books) anymore, so this is just dead code.
1 parent a844c29 commit faa14ac

File tree

1 file changed

+0
-11
lines changed

1 file changed

+0
-11
lines changed

doc/src/sgml/stylesheet.dsl

-11
Original file line numberDiff line numberDiff line change
@@ -153,10 +153,6 @@
153153
;; The rules in the default stylesheet for productname format it as a
154154
;; paragraph. This may be suitable for productname directly within
155155
;; *info, but it's nonsense when productname is used inline, as we do.
156-
(mode set-titlepage-recto-mode
157-
(element (para productname) ($charseq$)))
158-
(mode set-titlepage-verso-mode
159-
(element (para productname) ($charseq$)))
160156
(mode book-titlepage-recto-mode
161157
(element (para productname) ($charseq$)))
162158
(mode book-titlepage-verso-mode
@@ -218,17 +214,10 @@
218214
;; Returns the depth of auto TOC that should be made at the nd-level
219215
(define (toc-depth nd)
220216
(cond ((string=? (gi nd) (normalize "book")) 2)
221-
((string=? (gi nd) (normalize "set")) 2)
222217
((string=? (gi nd) (normalize "part")) 2)
223218
((string=? (gi nd) (normalize "chapter")) 2)
224219
(else 1)))
225220

226-
;; Put a horizontal line in the set TOC (just like the book TOC looks)
227-
(define (set-titlepage-separator side)
228-
(if (equal? side 'recto)
229-
(make empty-element gi: "HR")
230-
(empty-sosofo)))
231-
232221
;; Add character encoding and time of creation into HTML header
233222
(define %html-header-tags%
234223
(list (list "META" '("HTTP-EQUIV" "Content-Type") '("CONTENT" "text/html; charset=ISO-8859-1"))

0 commit comments

Comments
 (0)