diff options
| author | Albert Krewinkel <[email protected]> | 2022-08-22 12:06:08 +0200 |
|---|---|---|
| committer | Albert Krewinkel <[email protected]> | 2022-08-22 12:53:58 +0200 |
| commit | 08f1f4551cea2b1af660b35ce3ddf39dd4ed416c (patch) | |
| tree | 5361befd68f412acc09e37591f23e65103247006 /src | |
| parent | 90610eb78c3fcd9b943fd2e4d7730149248250d8 (diff) | |
Org writer: add support for jupyter nodebook cells.
Closes: #6367
Diffstat (limited to 'src')
| -rw-r--r-- | src/Text/Pandoc/Writers/Org.hs | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Writers/Org.hs b/src/Text/Pandoc/Writers/Org.hs index a749e48af..936e2aa87 100644 --- a/src/Text/Pandoc/Writers/Org.hs +++ b/src/Text/Pandoc/Writers/Org.hs @@ -105,6 +105,14 @@ blockToOrg :: PandocMonad m => Block -- ^ Block element -> Org m (Doc Text) blockToOrg Null = return empty +blockToOrg (Div (_, ["cell", "code"], _) (CodeBlock attr t : bs)) = do + -- ipynb code cell + let (ident, classes, kvs) = attr + blockListToOrg (CodeBlock (ident, classes ++ ["code"], kvs) t : bs) +blockToOrg (Div (_, ["output", "execute_result"], _) [CodeBlock _attr t]) = do + -- ipynb code result + return $ "#+RESULTS:" $$ + (prefixed ": " . vcat . map literal $ T.split (== '\n') t) blockToOrg (Div attr@(ident,_,_) bs) = do opts <- gets stOptions -- Strip off bibliography if citations enabled |