pandoc-placetable 0.5 → 0.5.1
raw patch · 2 files changed
+5/−3 lines, 2 files
Files
- pandoc-placetable.cabal +1/−1
- pandoc-placetable.hs +4/−2
pandoc-placetable.cabal view
@@ -1,5 +1,5 @@ Name: pandoc-placetable-Version: 0.5+Version: 0.5.1 Build-Type: Simple Synopsis: Pandoc filter to include CSV files Description: A Pandoc filter that replaces code blocks (that have the class `table`)
pandoc-placetable.hs view
@@ -32,6 +32,7 @@ #if defined(INLINE_MARKDOWN) import Text.Pandoc.Class (runPure)+import Text.Pandoc.Extensions (getDefaultExtensions) import Text.Pandoc.Readers.Markdown import Text.Pandoc.Options #endif@@ -235,6 +236,7 @@ cellspecs = zip (optAligns opts) widths' #if defined(INLINE_MARKDOWN)+ readerOpts = def {readerExtensions = getDefaultExtensions "markdown"} strToInlines s = if optInlineMarkdown opts then@@ -242,7 +244,7 @@ let s' = "# " ++ (concat $ lines s) extractIns (Header _ _ ins) = ins extractIns _ = []- in case runPure (readMarkdown def $ T.pack s') of+ in case runPure (readMarkdown readerOpts $ T.pack s') of Right (Pandoc _ bs) -> fromList $ extractIns $ head bs Left e -> str $ show e else@@ -253,7 +255,7 @@ strToBlocks s = if optInlineMarkdown opts then- case runPure (readMarkdown def $ T.pack s) of+ case runPure (readMarkdown readerOpts $ T.pack s) of Right (Pandoc _ bs) -> fromList bs Left e -> plain $ str $ show e else