From 4283ce3662cbb4b9d3165aef40455203ae106c47 Mon Sep 17 00:00:00 2001
From: fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>
Date: Fri, 27 Jul 2007 22:52:11 +0000
Subject: Use ` as default character for \verb in LaTeX output. If ` is in the
 content to be escaped, another symbol will be used as before.

git-svn-id: https://pandoc.googlecode.com/svn/trunk@806 788f1e2b-df1e-0410-8736-df70ead52e1b
---
 src/Text/Pandoc/Writers/LaTeX.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/Text')

diff --git a/src/Text/Pandoc/Writers/LaTeX.hs b/src/Text/Pandoc/Writers/LaTeX.hs
index c2303850a..cc2da8338 100644
--- a/src/Text/Pandoc/Writers/LaTeX.hs
+++ b/src/Text/Pandoc/Writers/LaTeX.hs
@@ -216,7 +216,7 @@ inlineToLaTeX (Subscript lst) = do
   return $ "\\textsubscript{" ++ contents ++ "}"
 inlineToLaTeX (Code str) = return $ "\\verb" ++ [chr] ++ stuffing ++ [chr]
                      where stuffing = str 
-                           chr      = ((enumFromTo '!' '~') \\ stuffing) !! 0
+                           chr      = (('`':(enumFromTo '!' '~')) \\ stuffing) !! 0
 inlineToLaTeX (Quoted SingleQuote lst) = do
   contents <- inlineListToLaTeX lst
   let s1 = if (not (null lst)) && (isQuoted (head lst)) then "\\," else ""
-- 
cgit v1.2.3