summaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Writers/LaTeX.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <fiddlosopher@gmail.com>2012-03-02 07:49:55 -0800
committerJohn MacFarlane <fiddlosopher@gmail.com>2012-03-02 07:49:55 -0800
commit53e6bf36a976e191cf1835f7fd440fba529ae741 (patch)
tree01c3686f22388227397d65641e70b0935888f6bd /src/Text/Pandoc/Writers/LaTeX.hs
parentc5fb21d5249270bb8f1a092ac0ce14a4e4069d5a (diff)
Fixed bug in LaTeX string escaper (with ~).
Diffstat (limited to 'src/Text/Pandoc/Writers/LaTeX.hs')
-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 e99b20c60..088cf7910 100644
--- a/src/Text/Pandoc/Writers/LaTeX.hs
+++ b/src/Text/Pandoc/Writers/LaTeX.hs
@@ -183,7 +183,7 @@ stringToLaTeX isUrl (x:xs) =
'-' -> case xs of -- prevent adjacent hyphens from forming ligatures
('-':_) -> "-{}" ++ rest
_ -> '-' : rest
- '~' | not isUrl -> "\\ensuremath{\\sim}"
+ '~' | not isUrl -> "\\ensuremath{\\sim}" ++ rest
'^' -> "\\^{}" ++ rest
'\\' -> "\\textbackslash{}" ++ rest
'€' -> "\\euro{}" ++ rest