aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Readers/LaTeX/Table.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2021-11-24 18:41:20 -0800
committerJohn MacFarlane <jgm@berkeley.edu>2021-11-24 18:41:20 -0800
commit2ca3993c6733d8add948338ef69d124237e21c69 (patch)
treed510727f62784e7623eeb0e2f5fa0cd16625248d /src/Text/Pandoc/Readers/LaTeX/Table.hs
parent7726b69cd351b890b299402450f8d14747f0898a (diff)
downloadpandoc-2ca3993c6733d8add948338ef69d124237e21c69.tar.gz
LaTeX reader: improve references.
- Resolve references to theorem environments. - Remove Span caused by "label" in figure, table, and theorem environments; this had an id that duplicated the environments' id. See #813.
Diffstat (limited to 'src/Text/Pandoc/Readers/LaTeX/Table.hs')
-rw-r--r--src/Text/Pandoc/Readers/LaTeX/Table.hs4
1 files changed, 3 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/LaTeX/Table.hs b/src/Text/Pandoc/Readers/LaTeX/Table.hs
index f56728fe1..7d5c4f265 100644
--- a/src/Text/Pandoc/Readers/LaTeX/Table.hs
+++ b/src/Text/Pandoc/Readers/LaTeX/Table.hs
@@ -368,7 +368,9 @@ addTableCaption = walkM go
((_,classes,kvs), Just ident) ->
(ident,classes,kvs)
_ -> attr
- return $ addAttrDiv attr' $ Table nullAttr capt spec th tb tf
+ return $ addAttrDiv attr'
+ $ maybe id removeLabel mblabel
+ $ Table nullAttr capt spec th tb tf
go x = return x
-- TODO: For now we add a Div to contain table attributes, since