lassik
/
pandoc
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Fix splicing bug

This commit is contained in:
Lassi Kortela 2021-08-25 11:50:57 +03:00
parent 9172a0651b
commit 8d1ef09d72
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
pandoc.r5rs.scm
View File

@ -43,9 +43,9 @@
((equal? type "Code") ((equal? type "Code")
`(code ,@(convert-many (cdr (contents-list))))) `(code ,@(convert-many (cdr (contents-list)))))
((equal? type "CodeBlock") ((equal? type "CodeBlock")
`(pre (@ (data-syntax ,(join-adjacent-strings `(pre (@ (data-syntax ,@(join-adjacent-strings
(vector->list (vector->list
(vector-refs (contents) 0 1))))) (vector-refs (contents) 0 1)))))
,@(convert-many (cdr (contents-list))))) ,@(convert-many (cdr (contents-list)))))
((equal? type "Emph") ((equal? type "Emph")
`(em ,@(convert-many (cdr (contents-list))))) `(em ,@(convert-many (cdr (contents-list)))))