Overview
| Comment: | Add sep tag function | 
|---|---|
| Timelines: | family | ancestors | descendants | both | trunk | 
| Files: | files | file ages | folders | 
| SHA3-256: | 58c1f025361a5e8b8779f6f3c23e1c5e | 
| User & Date: | joel on 2020-03-22 17:35:21 | 
| Other Links: | manifest | tags | 
Context
| 2020-03-22 | ||
| 17:37 | Change typography for sectional headings; add separator styling; save discretionary ligatures for certain elements, not normal body text check-in: 13f9b227 user: joel tags: trunk | |
| 17:35 | Add sep tag function check-in: 58c1f025 user: joel tags: trunk | |
| 2020-03-20 | ||
| 03:43 | Add and document ‘magick’ tag function check-in: adf0d96e user: joel tags: trunk | |
Changes
Modified pollen.rkt from [956611c9] to [b8678611].
| ︙ | ︙ | |||
| 90 91 92 93 94 95 96 97 98 99 100 101 102 103 | ;(poly-branch-tag color) (poly-branch-tag ol) (poly-branch-tag ul) (poly-branch-tag item) (poly-branch-tag sup) (poly-branch-tag blockquote) (poly-branch-tag newthought) (poly-branch-tag caps) (poly-branch-tag center) (poly-branch-tag section) (poly-branch-tag subsection) (poly-branch-tag code) (poly-branch-tag dialogue) (poly-branch-tag say) | > | 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 | ;(poly-branch-tag color) (poly-branch-tag ol) (poly-branch-tag ul) (poly-branch-tag item) (poly-branch-tag sup) (poly-branch-tag blockquote) (poly-branch-tag newthought) (poly-branch-tag sep) (poly-branch-tag caps) (poly-branch-tag center) (poly-branch-tag section) (poly-branch-tag subsection) (poly-branch-tag code) (poly-branch-tag dialogue) (poly-branch-tag say) | 
| ︙ | ︙ | 
Modified tags-html.rkt from [977f81cb] to [178b993f].
| ︙ | ︙ | |||
| 56 57 58 59 60 61 62 63 64 65 66 67 68 69 | 
         html-title
         html-excerpt
         html-excerpt*
         html-item
         html-section
         html-subsection
         html-newthought
         html-caps
         html-mono
         html-center
         html-strike
         html-block
         html-blockcode
         html-index
 | > | 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 | 
         html-title
         html-excerpt
         html-excerpt*
         html-item
         html-section
         html-subsection
         html-newthought
         html-sep
         html-caps
         html-mono
         html-center
         html-strike
         html-block
         html-blockcode
         html-index
 | 
| ︙ | ︙ | |||
| 83 84 85 86 87 88 89 90 91 92 93 94 95 96 | 
         html-fndef
         html-note-with-srcline)
(define html-item (default-tag-function 'li))
(define html-section (default-tag-function 'h2))
(define html-subsection (default-tag-function 'h3))
(define html-newthought (default-tag-function 'span #:class "newthought"))
(define html-caps (default-tag-function 'span #:class "caps"))
(define html-center (default-tag-function 'div #:style "text-align: center"))
(define html-strike (default-tag-function 'span #:style "text-decoration: line-through"))
(define html-dialogue (default-tag-function 'dl #:class "dialogue"))
(define html-mono (default-tag-function 'samp))
(define (html-block . elements)
 | > | 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 | 
         html-fndef
         html-note-with-srcline)
(define html-item (default-tag-function 'li))
(define html-section (default-tag-function 'h2))
(define html-subsection (default-tag-function 'h3))
(define html-newthought (default-tag-function 'span #:class "newthought"))
(define (html-sep) '(hr))
(define html-caps (default-tag-function 'span #:class "caps"))
(define html-center (default-tag-function 'div #:style "text-align: center"))
(define html-strike (default-tag-function 'span #:style "text-decoration: line-through"))
(define html-dialogue (default-tag-function 'dl #:class "dialogue"))
(define html-mono (default-tag-function 'samp))
(define (html-block . elements)
 | 
| ︙ | ︙ |