diff options
Diffstat (limited to 'src/Text/Pandoc/Writers/Docbook.hs')
-rw-r--r-- | src/Text/Pandoc/Writers/Docbook.hs | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Writers/Docbook.hs b/src/Text/Pandoc/Writers/Docbook.hs index 7366ee59c..2bb29da6c 100644 --- a/src/Text/Pandoc/Writers/Docbook.hs +++ b/src/Text/Pandoc/Writers/Docbook.hs @@ -233,6 +233,13 @@ inlineToDocbook opts (Emph lst) = inlineToDocbook opts (Strong lst) = inTags False "emphasis" [("role", "strong")] (inlinesToDocbook opts lst) +inlineToDocbook opts (Strikeout lst) = + inTags False "emphasis" [("role", "strikethrough")] + (inlinesToDocbook opts lst) +inlineToDocbook opts (Superscript lst) = + inTagsSimple "superscript" (inlinesToDocbook opts lst) +inlineToDocbook opts (Subscript lst) = + inTagsSimple "subscript" (inlinesToDocbook opts lst) inlineToDocbook opts (Quoted _ lst) = inTagsSimple "quote" (inlinesToDocbook opts lst) inlineToDocbook opts Apostrophe = text "'" |