diff options
| -rw-r--r-- | src/Text/Pandoc/Writers/Ipynb.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/Ipynb.hs b/src/Text/Pandoc/Writers/Ipynb.hs index 40248ed5a..f31cc38fd 100644 --- a/src/Text/Pandoc/Writers/Ipynb.hs +++ b/src/Text/Pandoc/Writers/Ipynb.hs @@ -67,7 +67,7 @@ pandocToNotebook opts (Pandoc meta blocks) = do let nbformat = case (lookupMeta "nbformat" jupyterMeta, lookupMeta "nbformat_minor" jupyterMeta) of - (Just (MetaString "4"), Just (MetaString y)) -> + (Just (MetaInlines [Str "4"]), Just (MetaInlines [Str y])) -> case safeRead y of Just z -> (4, z) Nothing -> (4, 5) |