aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2017-03-01 21:05:29 +0100
committerJohn MacFarlane <jgm@berkeley.edu>2017-03-01 21:05:29 +0100
commitd21c7fee66d6737ae1262cfea01633d041499da2 (patch)
tree8b363996af378492573d1b3a95896c80d6c5f9ed /src/Text/Pandoc
parent39a8359b571ba0aa1e193b0ff9ef6252acc7a754 (diff)
downloadpandoc-d21c7fee66d6737ae1262cfea01633d041499da2.tar.gz
LaTeX reader: don't drop contents of \hypertarget.
Diffstat (limited to 'src/Text/Pandoc')
-rw-r--r--src/Text/Pandoc/Readers/LaTeX.hs3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Readers/LaTeX.hs b/src/Text/Pandoc/Readers/LaTeX.hs
index 2836ff4cc..e7683fd1c 100644
--- a/src/Text/Pandoc/Readers/LaTeX.hs
+++ b/src/Text/Pandoc/Readers/LaTeX.hs
@@ -375,6 +375,8 @@ blockCommands = M.fromList $
-- includes
, ("lstinputlisting", inputListing)
, ("graphicspath", graphicsPath)
+ -- hyperlink
+ , ("hypertarget", braced >> grouped block)
] ++ map ignoreBlocks
-- these commands will be ignored unless --parse-raw is specified,
-- in which case they will appear as raw latex blocks
@@ -645,6 +647,7 @@ inlineCommands = M.fromList $
<|> citation "citeauthor" AuthorInText False)
, ("nocite", mempty <$ (citation "nocite" NormalCitation False >>=
addMeta "nocite"))
+ , ("hypertarget", braced >> tok)
] ++ map ignoreInlines
-- these commands will be ignored unless --parse-raw is specified,
-- in which case they will appear as raw latex blocks: