aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Shared.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2021-10-01 15:42:00 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2021-10-01 15:42:00 -0700
commitfb0d6c7cb63a791fa72becf21ed493282e65ea91 (patch)
tree5041a742bd53fd8d88d267106c283d3c80f820ab /src/Text/Pandoc/Shared.hs
parent021cdb543b00995f86eefd5d84314d9e1f5abf82 (diff)
downloadpandoc-fb0d6c7cb63a791fa72becf21ed493282e65ea91.tar.gz
Depend on pandoc-types 1.23, remove Null constructor on Block.
Diffstat (limited to 'src/Text/Pandoc/Shared.hs')
-rw-r--r--src/Text/Pandoc/Shared.hs1
1 files changed, 0 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Shared.hs b/src/Text/Pandoc/Shared.hs
index 920edca7b..7bb830d0e 100644
--- a/src/Text/Pandoc/Shared.hs
+++ b/src/Text/Pandoc/Shared.hs
@@ -948,7 +948,6 @@ blockToInlines (Table _ _ _ (TableHead _ hbd) bodies (TableFoot _ fbd)) =
unTableBody (TableBody _ _ hd bd) = hd <> bd
unTableBodies = concatMap unTableBody
blockToInlines (Div _ blks) = blocksToInlines' blks
-blockToInlines Null = mempty
blocksToInlinesWithSep :: Inlines -> [Block] -> Inlines
blocksToInlinesWithSep sep =