◊(Local Yarn Code "Check-in [40ecb212]")

Overview
Comment:Fix paragraph decoding inside notes
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256: 40ecb2126b1376f3c75e683240b538a624931d72719e007fba668237aa0f01e0
User & Date: joel on 2019-04-11 03:23:07
Other Links: manifest | tags
Context
2019-04-11
04:16
Add quick templating for new articles check-in: 1afe7e97 user: joel tags: trunk
03:23
Fix paragraph decoding inside notes check-in: 40ecb212 user: joel tags: trunk
03:22
Fix bug preventing inclusion of article footers check-in: 41f70967 user: joel tags: trunk
Changes

Modified tags-html.rkt from [3eb83629] to [4d4ea45a].

192
193
194
195
196
197
198
199
                                                                    (fn-id fn-name)
                                                                    (format "~a" (+ 1 fnref-num)))]] "↩"))])
                `(li [[id ,(fndef-id fn-name)]] ,@definition-text ,@backrefs))))
  (cond [(null? note-items) ""]
        [else `(section ((class "footnotes")) (hr) (ol ,@note-items))]))

(define (html-note attrs elems)
  (txexpr 'note attrs (decode-paragraphs elems #:force? #t)))







|
192
193
194
195
196
197
198
199
                                                                    (fn-id fn-name)
                                                                    (format "~a" (+ 1 fnref-num)))]] "↩"))])
                `(li [[id ,(fndef-id fn-name)]] ,@definition-text ,@backrefs))))
  (cond [(null? note-items) ""]
        [else `(section ((class "footnotes")) (hr) (ol ,@note-items))]))

(define (html-note attrs elems)
  (txexpr 'note attrs (decode-hardwrapped-paragraphs elems)))