aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Writers
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2020-06-17 10:12:55 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2020-06-17 10:12:55 -0700
commit9d0506e4047f797a0672d7767830b59f1710d191 (patch)
treea1cfbb6af37746152c4c9ae73831de7c78aece5f /src/Text/Pandoc/Writers
parenta8b3117e049f0a5821f1512f6c41e285b01efd25 (diff)
downloadpandoc-9d0506e4047f797a0672d7767830b59f1710d191.tar.gz
LaTeX writer: escape `^` specially for listings.
Closes #6460.
Diffstat (limited to 'src/Text/Pandoc/Writers')
-rw-r--r--src/Text/Pandoc/Writers/LaTeX.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/LaTeX.hs b/src/Text/Pandoc/Writers/LaTeX.hs
index 2e116191e..3753604db 100644
--- a/src/Text/Pandoc/Writers/LaTeX.hs
+++ b/src/Text/Pandoc/Writers/LaTeX.hs
@@ -1204,7 +1204,7 @@ inlineToLaTeX (Code (_,classes,kvs) str) = do
let chr = case "!\"'()*,-./:;?@" \\ T.unpack str of
(c:_) -> c
[] -> '!'
- let str' = escapeStringUsing (backslashEscapes "\\{}%~_&#") str
+ let str' = escapeStringUsing (backslashEscapes "\\{}%~_&#^") str
-- we always put lstinline in a dummy 'passthrough' command
-- (defined in the default template) so that we don't have
-- to change the way we escape characters depending on whether