aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2019-03-06 10:09:34 -0800
committerJohn MacFarlane <jgm@berkeley.edu>2019-03-06 10:09:34 -0800
commit1c4c384a622ee5db7aea0d6d3d2f10f8ada891f1 (patch)
treec8dcef4320a6c70d3f93e17d1d800302548d6d8b
parent707eef34b74e64174ca0af3373a04176b7860f18 (diff)
downloadpandoc-1c4c384a622ee5db7aea0d6d3d2f10f8ada891f1.tar.gz
ipynb writer: recurse into native divs for output cell data.
See #5354.
-rw-r--r--src/Text/Pandoc/Writers/Ipynb.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Writers/Ipynb.hs b/src/Text/Pandoc/Writers/Ipynb.hs
index b7eb7f9f6..661f585f4 100644
--- a/src/Text/Pandoc/Writers/Ipynb.hs
+++ b/src/Text/Pandoc/Writers/Ipynb.hs
@@ -208,6 +208,7 @@ extractData bs = do
return (M.insert "text/html" (TextualData (T.pack raw)) mmap, meta)
go (mmap, meta) (RawBlock (Format "latex") raw) =
return (M.insert "text/latex" (TextualData (T.pack raw)) mmap, meta)
+ go (mmap, meta) (Div _ bs') = foldM go (mmap, meta) bs'
go (mmap, meta) b = (mmap, meta) <$ report (BlockNotRendered b)
pairsToJSONMeta :: [(String, String)] -> JSONMeta