diff options
| author | John MacFarlane <fiddlosopher@gmail.com> | 2012-09-15 20:50:43 -0700 |
|---|---|---|
| committer | John MacFarlane <fiddlosopher@gmail.com> | 2012-09-15 20:50:43 -0700 |
| commit | 14616931596ffd366f3a86930bc0d2b49c825b98 (patch) | |
| tree | 684c0028bce2dae4a3562674aa734342973f50c8 /src/Text | |
| parent | d9e34ce34db194f82a0910016174d7d88c2f6eeb (diff) | |
| download | pandoc-14616931596ffd366f3a86930bc0d2b49c825b98.tar.gz | |
LaTeX writer: Don't escape _ in hyperref identifiers.
Diffstat (limited to 'src/Text')
| -rw-r--r-- | src/Text/Pandoc/Writers/LaTeX.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/LaTeX.hs b/src/Text/Pandoc/Writers/LaTeX.hs index 1967e40dc..2b5c7e84b 100644 --- a/src/Text/Pandoc/Writers/LaTeX.hs +++ b/src/Text/Pandoc/Writers/LaTeX.hs @@ -571,7 +571,7 @@ inlineToLaTeX (LineBreak) = return "\\\\" inlineToLaTeX Space = return space inlineToLaTeX (Link txt ('#':ident, _)) = do contents <- inlineListToLaTeX txt - ident' <- stringToLaTeX False ident + ident' <- stringToLaTeX True ident return $ text "\\hyperref" <> brackets (text ident') <> braces contents inlineToLaTeX (Link txt (src, _)) = case txt of |