diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2013-10-11 10:43:07 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2013-10-11 10:43:07 -0700 |
| commit | 25e43d1c8944f793b7c22fad207a94a11d93365d (patch) | |
| tree | b52c1d48dc19b999234df80f5b3712457c6aac83 /src/Text/Pandoc/Readers/LaTeX.hs | |
| parent | 627c54011b9492ab60d6080be3316187d13614b5 (diff) | |
LaTeX reader: Fixed character escaping in \url{}.
Previously `\~` wasn't handled properly, among others.
Diffstat (limited to 'src/Text/Pandoc/Readers/LaTeX.hs')
| -rw-r--r-- | src/Text/Pandoc/Readers/LaTeX.hs | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/src/Text/Pandoc/Readers/LaTeX.hs b/src/Text/Pandoc/Readers/LaTeX.hs index cf5119345..d22430eb9 100644 --- a/src/Text/Pandoc/Readers/LaTeX.hs +++ b/src/Text/Pandoc/Readers/LaTeX.hs @@ -527,9 +527,7 @@ inNote ils = unescapeURL :: String -> String unescapeURL ('\\':x:xs) | isEscapable x = x:unescapeURL xs - where isEscapable '%' = True - isEscapable '#' = True - isEscapable _ = False + where isEscapable c = c `elem` "#$%&~_^\\{}" unescapeURL (x:xs) = x:unescapeURL xs unescapeURL [] = "" |