Add stubs for some missing types
This commit is contained in:
parent
a1d604d1fc
commit
109f74070c
|
@ -63,6 +63,21 @@
|
||||||
`(span ,@(convert-many (contents-list))))
|
`(span ,@(convert-many (contents-list))))
|
||||||
((equal? type "Para")
|
((equal? type "Para")
|
||||||
`(p ,@(convert-many (contents-list))))
|
`(p ,@(convert-many (contents-list))))
|
||||||
|
((equal? type "Quoted") ; TODO: What's this?
|
||||||
|
`(blockquote
|
||||||
|
,@(convert-many '())))
|
||||||
|
((equal? type "SingleQuote") ; TODO: What's this?
|
||||||
|
`(blockquote
|
||||||
|
,@(convert-many '())))
|
||||||
|
((equal? type "DoubleQuote") ; TODO: What's this?
|
||||||
|
`(blockquote
|
||||||
|
,@(convert-many '())))
|
||||||
|
((equal? type "OrderedList") ; TODO: What's this?
|
||||||
|
`(blockquote
|
||||||
|
,@(convert-many '())))
|
||||||
|
((equal? type "Superscript") ; TODO: What's this?
|
||||||
|
`(blockquote
|
||||||
|
,@(convert-many '())))
|
||||||
((equal? type "SoftBreak")
|
((equal? type "SoftBreak")
|
||||||
"\n")
|
"\n")
|
||||||
((equal? type "Strong")
|
((equal? type "Strong")
|
||||||
|
|
Loading…
Reference in New Issue