e1cc73e · typeable/pandoc

git.iko.soy/typeable/pandoc

Text.Pandoc.PDF: replace `</>` with literal "/".

We use forward-slash for a directory separator in tmpDir, even on Windows (because that's what tex likes). So we should not put a backslash between the tmpDir and the filename on Windows. This is harmless enough in normal Windows setups, but it breaks on Cygwin. Closes #5451. Thanks to @cc2x for noticing and diagnosing the problem.

commite1cc73ed97a932d46ee1e16862ea70ad37d94cc1 authorJohn MacFarlane <jgm@berkeley.edu> dateTue 16 Apr 2019, 21:12 (8 years ago) parent144b2ea

1 file changed+2−2

compare with master

unifiedsplit

src/Text/Pandoc/PDF.hs+2−2

src/Text/Pandoc/PDF.hs+2−2

@@ -297,7 +297,7 @@ runTectonic verbosity program args' tmpDir' source = do

297297 putStrLn "[makePDF] Running"

298298 BL.hPutStr stdout out

299299 putStr "\n"

300− let pdfFile = tmpDir </> "texput.pdf"

300+ let pdfFile = tmpDir ++ "/texput.pdf"

301301 (_, pdf) <- getResultingPDF Nothing pdfFile

302302 return (exit, out, pdf)

303303

@@ -335,7 +335,7 @@ runTeXProgram verbosity program args runNumber numRuns tmpDir' source = do

335335 [x] -> drop 8 x

336336 _ -> tmpDir'

337337 liftIO $ createDirectoryIfMissing True tmpDir

338− let file = tmpDir </> "input.tex"

338+ let file = tmpDir ++ "/input.tex" -- note: tmpDir has / path separators

339339 exists <- liftIO $ doesFileExist file

340340 unless exists $ liftIO $ BS.writeFile file $ UTF8.fromText source

341341 let isLatexMk = takeBaseName program == "latexmk"