diff options
author | John MacFarlane <jgm@berkeley.edu> | 2021-11-07 21:08:20 -0800 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2021-11-07 21:08:20 -0800 |
commit | cc46667953b609d87bbf5611f50843871b304a0c (patch) | |
tree | edfc1a3ccb237d6dd5cfa85f3ae68814bcfce8f3 /src/Text/Pandoc/Readers | |
parent | 881b45209e8fd70079e409d05fa7402741501940 (diff) | |
download | pandoc-cc46667953b609d87bbf5611f50843871b304a0c.tar.gz |
LaTeX reader: add 'uri' class when parsing `\url`.
Closes #7672.
Diffstat (limited to 'src/Text/Pandoc/Readers')
-rw-r--r-- | src/Text/Pandoc/Readers/LaTeX.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Readers/LaTeX.hs b/src/Text/Pandoc/Readers/LaTeX.hs index 15148debb..25acc0f7e 100644 --- a/src/Text/Pandoc/Readers/LaTeX.hs +++ b/src/Text/Pandoc/Readers/LaTeX.hs @@ -390,8 +390,8 @@ inlineCommands = M.unions unescapeURL . removeDoubleQuotes $ untokenize src) -- hyperref - , ("url", (\url -> link url "" (str url)) . unescapeURL . untokenize <$> - bracedUrl) + , ("url", (\url -> linkWith ("",["uri"],[]) url "" (str url)) + . unescapeURL . untokenize <$> bracedUrl) , ("nolinkurl", code . unescapeURL . untokenize <$> bracedUrl) , ("href", do url <- bracedUrl sp |