aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/Text/Pandoc/Readers/RTF.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/RTF.hs b/src/Text/Pandoc/Readers/RTF.hs
index 749a38dd3..0e7fbac5a 100644
--- a/src/Text/Pandoc/Readers/RTF.hs
+++ b/src/Text/Pandoc/Readers/RTF.hs
@@ -648,7 +648,7 @@ emitBlocks bs = do
let prop = case annotatedToks of
[] -> def
((p,_):_) -> p
- tbl <- if gInTable prop
+ tbl <- if gInTable prop || null annotatedToks
then pure mempty
else closeTable
new <-