diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2019-03-28 17:12:44 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2019-03-28 17:12:44 -0700 |
| commit | 83ea529cf3cd410b598c3389a1edcc3d5593640c (patch) | |
| tree | bc5de3f7f253cca998237cf4850b294ad36066a4 | |
| parent | 9c7a57d64826f6c00893f853bb79d49bbc30bb06 (diff) | |
| download | pandoc-83ea529cf3cd410b598c3389a1edcc3d5593640c.tar.gz | |
Ipynb writer: fixed carry-over of nbformat from metadata.
Previously we wrongly assumed it would be in a MetaString.
It's an a MetaInlines.
| -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) |