aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Readers/RST.hs
diff options
context:
space:
mode:
authordespresc <christian.j.j.despres@gmail.com>2020-04-05 19:53:35 -0400
committerdespresc <christian.j.j.despres@gmail.com>2020-04-15 23:03:22 -0400
commitd368536a4ebfc542a58bd9bec6718590711c6efb (patch)
treecc4b48ef890eae806b616ce0221b1284ebfb3421 /src/Text/Pandoc/Readers/RST.hs
parent4e34d366df31937cdc69b6b366355f10a84c16b2 (diff)
downloadpandoc-d368536a4ebfc542a58bd9bec6718590711c6efb.tar.gz
Adapt to the removal of the RowSpan, ColSpan, RowHeadColumns accessors
Diffstat (limited to 'src/Text/Pandoc/Readers/RST.hs')
-rw-r--r--src/Text/Pandoc/Readers/RST.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/RST.hs b/src/Text/Pandoc/Readers/RST.hs
index 0dadd5120..0460c43f4 100644
--- a/src/Text/Pandoc/Readers/RST.hs
+++ b/src/Text/Pandoc/Readers/RST.hs
@@ -794,7 +794,7 @@ tableDirective top fields body = do
where
-- only valid on the very first row of a table section
rowLength (Row _ rb) = sum $ cellLength <$> rb
- cellLength (Cell _ _ _ w _) = max 1 (getColSpan w)
+ cellLength (Cell _ _ _ (ColSpan w) _) = max 1 w
strictPos w
| w > 0 = ColWidth w
| otherwise = ColWidthDefault