diff options
author | Emily Bourke <undergroundquizscene@gmail.com> | 2021-04-11 21:42:53 +0100 |
---|---|---|
committer | Albert Krewinkel <albert@zeitkraut.de> | 2021-05-28 20:15:23 +0200 |
commit | 44484d0dee1bd095240b9faf26f8d1dad8e560ea (patch) | |
tree | d7aea87989f34d3e85b9690a91f84cf0e33a314c /src/Text/Pandoc/Readers/Docx | |
parent | 4842c5fb828c3c34d816fa7bccd4656857742a0b (diff) | |
download | pandoc-44484d0dee1bd095240b9faf26f8d1dad8e560ea.tar.gz |
Docx reader: Read table column widths.
Diffstat (limited to 'src/Text/Pandoc/Readers/Docx')
-rw-r--r-- | src/Text/Pandoc/Readers/Docx/Parse.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Docx/Parse.hs b/src/Text/Pandoc/Readers/Docx/Parse.hs index 7325ff300..978d6ff3a 100644 --- a/src/Text/Pandoc/Readers/Docx/Parse.hs +++ b/src/Text/Pandoc/Readers/Docx/Parse.hs @@ -563,7 +563,7 @@ elemToTblGrid :: NameSpaces -> Element -> D TblGrid elemToTblGrid ns element | isElem ns "w" "tblGrid" element = let cols = findChildrenByName ns "w" "gridCol" element in - mapD (\e -> maybeToD (findAttrByName ns "w" "val" e >>= stringToInteger)) + mapD (\e -> maybeToD (findAttrByName ns "w" "w" e >>= stringToInteger)) cols elemToTblGrid _ _ = throwError WrongElem |