File tree 1 file changed +0
-11
lines changed
1 file changed +0
-11
lines changed Original file line number Diff line number Diff line change 153
153
;; The rules in the default stylesheet for productname format it as a
154
154
;; paragraph. This may be suitable for productname directly within
155
155
;; *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$)))
160
156
(mode book-titlepage-recto-mode
161
157
(element (para productname) ($charseq$)))
162
158
(mode book-titlepage-verso-mode
218
214
;; Returns the depth of auto TOC that should be made at the nd-level
219
215
(define (toc-depth nd)
220
216
(cond ((string=? (gi nd) (normalize "book" )) 2 )
221
- ((string=? (gi nd) (normalize "set" )) 2 )
222
217
((string=? (gi nd) (normalize "part" )) 2 )
223
218
((string=? (gi nd) (normalize "chapter" )) 2 )
224
219
(else 1 )))
225
220
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
-
232
221
;; Add character encoding and time of creation into HTML header
233
222
(define %html-header-tags%
234
223
(list (list "META" '("HTTP-EQUIV" "Content-Type" ) '("CONTENT" "text/html; charset=ISO-8859-1" ))
You can’t perform that action at this time.
0 commit comments