convertToHtml :: MarkupEngine -> T.Text -> T.Text
convertToHtml engine = case engine of
  Markdown -> T.pack . writeHtmlString def . readMarkdown def . T.unpack
convertToHtml :: MarkupEngine -> T.Text -> T.Text
convertToHtml engine = case engine of
  Markdown -> T.pack . writeHtmlString def . readMarkdown def . T.unpack
convertToHtml engine = case engine of
  Markdown -> T.pack . writeHtmlString def . readMarkdown def . T.unpack