diff options
Diffstat (limited to 'Text/Pandoc/Writers/HTML.hs')
| -rw-r--r-- | Text/Pandoc/Writers/HTML.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/Text/Pandoc/Writers/HTML.hs b/Text/Pandoc/Writers/HTML.hs index 6c28edb42..e5ed4468e 100644 --- a/Text/Pandoc/Writers/HTML.hs +++ b/Text/Pandoc/Writers/HTML.hs @@ -260,6 +260,7 @@ inlineListToIdentifier' (x:xs) = Subscript lst -> inlineListToIdentifier' lst Strong lst -> inlineListToIdentifier' lst Quoted _ lst -> inlineListToIdentifier' lst + Cite _ lst -> inlineListToIdentifier' lst Code s -> s Space -> "-" EmDash -> "-" @@ -502,6 +503,7 @@ inlineToHtml opts inline = theclass "footnoteRef", identifier ("fnref" ++ ref)] << sup << ref + (Cite _ il) -> inlineListToHtml opts il blockListToNote :: WriterOptions -> String -> [Block] -> State WriterState Html blockListToNote opts ref blocks = |