Tissevert/pandoc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 1

LaTeX writer: Change \ to / in paths.

Browse source 
`/` works even on Windows in LaTeX.  `\` will cause major problems
if unescaped.
This commit is contained in:
John MacFarlane 2013-07-25 20:29:42 -07:00
parent fb9f2e4bd5
commit d5fad2306a
1 changed files with 4 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
src/Text/Pandoc/Writers/LaTeX.hs
View file

@ -202,7 +202,8 @@ stringToLaTeX ctx (x:xs) = do
_ -> '-' : rest
'~' | not isUrl -> "\\textasciitilde{}" ++ rest
'^' -> "\\^{}" ++ rest
'\\' -> "\\textbackslash{}" ++ rest
'\\'| isUrl -> '/' : rest -- NB. / works as path sep even on Windows
| otherwise -> "\\textbackslash{}" ++ rest
'|' -> "\\textbar{}" ++ rest
'<' -> "\\textless{}" ++ rest
'>' -> "\\textgreater{}" ++ rest
@ -648,7 +649,8 @@ inlineToLaTeX (Image _ (source, _)) = do
let source' = if isAbsoluteURI source
then source
else unEscapeString source
return $ "\\includegraphics" <> braces (text source')
source'' <- stringToLaTeX URLString source'
return $ "\\includegraphics" <> braces (text source'')
inlineToLaTeX (Note contents) = do
modify (\s -> s{stInNote = True})
contents' <- blockListToLaTeX contents