diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2017-12-02 15:31:53 -0800 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2017-12-02 16:51:31 -0800 |
| commit | d6c58eb836f033a48955796de4d9ffb3b30e297b (patch) | |
| tree | a9723c47555e81363ddec7bb1d900d1e609896ae /src/Text/Pandoc/Readers | |
| parent | f4b86a1bc2c77d50057399f9d93163c2bbc053bd (diff) | |
| download | pandoc-d6c58eb836f033a48955796de4d9ffb3b30e297b.tar.gz | |
Docx reader: don't strip out empty paragraphs.
We now have the `--strip-empty-paragraphs` option for that,
if you want it. Closes #2252.
Updated docx reader tests.
We use stripEmptyParagraphs to avoid changing too
many tests. We should add new tests for empty paragraphs.
Diffstat (limited to 'src/Text/Pandoc/Readers')
| -rw-r--r-- | src/Text/Pandoc/Readers/Docx.hs | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/src/Text/Pandoc/Readers/Docx.hs b/src/Text/Pandoc/Readers/Docx.hs index 295b79195..1fac98b14 100644 --- a/src/Text/Pandoc/Readers/Docx.hs +++ b/src/Text/Pandoc/Readers/Docx.hs @@ -534,9 +534,7 @@ bodyPartToBlocks (Paragraph pPr parparts) then do modify $ \s -> s { docxDropCap = ils' } return mempty else do modify $ \s -> s { docxDropCap = mempty } - return $ case isNull ils' of - True -> mempty - _ -> parStyleToTransform pPr $ para ils' + return $ parStyleToTransform pPr $ para ils' bodyPartToBlocks (ListItem pPr numId lvl (Just levelInfo) parparts) = do let kvs = case levelInfo of |