Fix missing first word within <em> tags
This commit is contained in:
parent
c235a0e70e
commit
181522ca83
|
@ -48,7 +48,7 @@
|
|||
(vector-refs (contents) 0 1)))))
|
||||
,@(convert-many (cdr (contents-list)))))
|
||||
((equal? type "Emph")
|
||||
`(em ,@(convert-many (cdr (contents-list)))))
|
||||
`(em ,@(convert-many (contents-list))))
|
||||
((equal? type "Header")
|
||||
(let* ((level (car (contents-list)))
|
||||
(h-tag (string->symbol
|
||||
|
|
Loading…
Reference in New Issue