aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Readers/Ipynb.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2019-01-24 16:51:56 -0800
committerJohn MacFarlane <jgm@berkeley.edu>2019-01-24 16:51:56 -0800
commit2f54470266813866d30a68a75ee98c0de58fcd8d (patch)
treed9c608ba1051bbfda811e12fef9a0b017e2c9929 /src/Text/Pandoc/Readers/Ipynb.hs
parent7167330a2a858fcfed313443a021aee90b13b8cc (diff)
downloadpandoc-2f54470266813866d30a68a75ee98c0de58fcd8d.tar.gz
Ipynb: Put all jupyter metadata under 'jupyter' key.
Diffstat (limited to 'src/Text/Pandoc/Readers/Ipynb.hs')
-rw-r--r--src/Text/Pandoc/Readers/Ipynb.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Ipynb.hs b/src/Text/Pandoc/Readers/Ipynb.hs
index 2497e6a0a..ad0652ed0 100644
--- a/src/Text/Pandoc/Readers/Ipynb.hs
+++ b/src/Text/Pandoc/Readers/Ipynb.hs
@@ -83,7 +83,7 @@ notebookToPandoc opts notebook = do
_ -> "python"
bs <- mconcat <$> mapM (cellToBlocks opts lang) cells
let Pandoc _ blocks = B.doc bs
- return $ Pandoc (Meta m) blocks
+ return $ Pandoc (Meta $ M.insert "jupyter" (MetaMap m) mempty) blocks
cellToBlocks :: PandocMonad m
=> ReaderOptions -> String -> Cell a -> m B.Blocks