diff options
author | John MacFarlane <jgm@berkeley.edu> | 2017-03-01 21:05:29 +0100 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2017-03-01 21:05:29 +0100 |
commit | d21c7fee66d6737ae1262cfea01633d041499da2 (patch) | |
tree | 8b363996af378492573d1b3a95896c80d6c5f9ed /src/Text/Pandoc | |
parent | 39a8359b571ba0aa1e193b0ff9ef6252acc7a754 (diff) | |
download | pandoc-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.hs | 3 |
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: |