From 7167330a2a858fcfed313443a021aee90b13b8cc Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Thu, 24 Jan 2019 16:33:03 -0800
Subject: Revert "Prepend `jupyter_` to jupyter metadata keys."

This reverts commit 5eaff399d5d6dc30b0d453eff42c4101674d75ab.
---
 src/Text/Pandoc/Readers/Ipynb.hs | 6 ------
 1 file changed, 6 deletions(-)

(limited to 'src/Text/Pandoc/Readers')

diff --git a/src/Text/Pandoc/Readers/Ipynb.hs b/src/Text/Pandoc/Readers/Ipynb.hs
index 0bcde1990..2497e6a0a 100644
--- a/src/Text/Pandoc/Readers/Ipynb.hs
+++ b/src/Text/Pandoc/Readers/Ipynb.hs
@@ -72,14 +72,8 @@ notebookToPandoc :: (PandocMonad m, FromJSON (Notebook a))
 notebookToPandoc opts notebook = do
   let cells = notebookCells notebook
   let (fmt,fmtminor) = notebookFormat notebook
-  let jupyterMetaFields :: [String]
-      jupyterMetaFields = ["kernelspec", "language_info", "toc"]
   let m = M.insert "nbformat" (MetaString $ show fmt) $
           M.insert "nbformat_minor" (MetaString $ show fmtminor) $
-          -- mark jupyter fields specially so it doesn't trigger toc
-           M.mapKeys (\k -> if k `elem` jupyterMetaFields
-                              then "jupyter_" <> k
-                              else k) $
           jsonMetaToMeta (notebookMetadata notebook)
   let lang = case M.lookup "kernelspec" m of
                    Just (MetaMap ks) ->
-- 
cgit v1.2.3