aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Readers
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2017-08-09 09:14:52 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2017-08-09 09:15:50 -0700
commit09b7df472dbc171e6130090dfec0f7b71d1d955e (patch)
tree2d0765f315c9adaad787da290b7bf76a347aadb6 /src/Text/Pandoc/Readers
parentdb55f7c1b243cbc82c70276c7dfb9c0403e369b0 (diff)
downloadpandoc-09b7df472dbc171e6130090dfec0f7b71d1d955e.tar.gz
LaTeX reader: Use `label` instead of `data-label` for label in caption.
See d441e656db576f266c4866e65ff9e4705d376381, #3639.
Diffstat (limited to 'src/Text/Pandoc/Readers')
-rw-r--r--src/Text/Pandoc/Readers/LaTeX.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/LaTeX.hs b/src/Text/Pandoc/Readers/LaTeX.hs
index e51f797af..0f0e71b93 100644
--- a/src/Text/Pandoc/Readers/LaTeX.hs
+++ b/src/Text/Pandoc/Readers/LaTeX.hs
@@ -1632,7 +1632,7 @@ setCaption = do
try $ spaces >> controlSeq "label" >> (Just <$> tok)
let ils' = case mblabel of
Just lab -> ils <> spanWith
- ("",[],[("data-label", stringify lab)]) mempty
+ ("",[],[("label", stringify lab)]) mempty
Nothing -> ils
updateState $ \st -> st{ sCaption = Just ils' }
return mempty