aboutsummaryrefslogtreecommitdiff
path: root/src/Text
diff options
context:
space:
mode:
Diffstat (limited to 'src/Text')
-rw-r--r--src/Text/Pandoc/Readers/Docx.hs2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Readers/Docx.hs b/src/Text/Pandoc/Readers/Docx.hs
index b00dbd247..2852defc7 100644
--- a/src/Text/Pandoc/Readers/Docx.hs
+++ b/src/Text/Pandoc/Readers/Docx.hs
@@ -810,6 +810,8 @@ bodyPartToBlocks (Captioned parstyle parparts bpart) = do
-> singleton $ Figure attr' capt [Plain im]
[Div attr bls']
-> toCaptioned (attr <> attr') bls'
+ [BlockQuote bls']
+ -> toCaptioned attr' bls'
_ -> captContents
pure $ toCaptioned nullAttr (toList bs)
bodyPartToBlocks (Tbl _ _ _ _ []) =