From 109f74070cfc44965ea3ad54f94751a72a82310f Mon Sep 17 00:00:00 2001 From: Lassi Kortela Date: Sat, 4 Sep 2021 12:52:58 +0300 Subject: [PATCH] Add stubs for some missing types --- pandoc.r5rs.scm | 15 +++++++++++++++ 1 file changed, 15 insertions(+) diff --git a/pandoc.r5rs.scm b/pandoc.r5rs.scm index b5a9918..52bc6db 100644 --- a/pandoc.r5rs.scm +++ b/pandoc.r5rs.scm @@ -63,6 +63,21 @@ `(span ,@(convert-many (contents-list)))) ((equal? type "Para") `(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") "\n") ((equal? type "Strong")