diff options
| author | Jesse Rosenthal <jrosenthal@jhu.edu> | 2018-01-03 22:07:07 -0500 |
|---|---|---|
| committer | Jesse Rosenthal <jrosenthal@jhu.edu> | 2018-01-03 22:07:07 -0500 |
| commit | 85f8d9285063767e52266243d2b10af1cbe5f856 (patch) | |
| tree | b8145539a783db86bbecfb497b58ac86a83f7112 /src/Text/Pandoc | |
| parent | bf15258d3b18bd2a7daae803b52a9b851eb204eb (diff) | |
| download | pandoc-85f8d9285063767e52266243d2b10af1cbe5f856.tar.gz | |
Powerpoint writer: Ignore Notes div
For now, ignore notes div for parity with other slide outputs.
Diffstat (limited to 'src/Text/Pandoc')
| -rw-r--r-- | src/Text/Pandoc/Writers/Powerpoint.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Writers/Powerpoint.hs b/src/Text/Pandoc/Writers/Powerpoint.hs index e5c29b75a..c53f2f66c 100644 --- a/src/Text/Pandoc/Writers/Powerpoint.hs +++ b/src/Text/Pandoc/Writers/Powerpoint.hs @@ -441,6 +441,7 @@ blockToParagraphs (DefinitionList entries) = do definition <- concatMapM (blockToParagraphs . BlockQuote) blksLst return $ term ++ definition concatMapM go entries +blockToParagraphs (Div (_, ("notes" : []), _) _) = return [] blockToParagraphs (Div _ blks) = concatMapM blockToParagraphs blks blockToParagraphs blk = do P.report $ BlockNotRendered blk |