diff options
author | Jesse Rosenthal <jrosenthal@jhu.edu> | 2018-01-16 10:45:45 -0500 |
---|---|---|
committer | Jesse Rosenthal <jrosenthal@jhu.edu> | 2018-01-16 13:22:02 -0500 |
commit | 404706d29a8f45b43ef2ef13e93d1786dde863a0 (patch) | |
tree | ebd508e9cb8dcf3e36e437d36307575940058228 /src/Text/Pandoc/Readers/Docx.hs | |
parent | 551d8e8541cd056a2c8c81095e98e01bca4436d6 (diff) |
Docx reader: Parse fldChar tags
This will allow us to parse instrTxt inside fldChar tags.
Diffstat (limited to 'src/Text/Pandoc/Readers/Docx.hs')
-rw-r--r-- | src/Text/Pandoc/Readers/Docx.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Readers/Docx.hs b/src/Text/Pandoc/Readers/Docx.hs index e0f32b908..998179d2f 100644 --- a/src/Text/Pandoc/Readers/Docx.hs +++ b/src/Text/Pandoc/Readers/Docx.hs @@ -446,6 +446,9 @@ parPartToInlines' (PlainOMath exps) = return $ math $ writeTeX exps parPartToInlines' (SmartTag runs) = do smushInlines <$> mapM runToInlines runs +parPartToInlines' (Field _ runs) = do + smushInlines <$> mapM runToInlines runs +parPartToInlines' NullParPart = return mempty isAnchorSpan :: Inline -> Bool isAnchorSpan (Span (_, classes, kvs) _) = |