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

T.P.PDF, convertImage: normalize paths.

Browse source 
This will avoid paths on Windows with mixed path separators,
which may cause problems with SVG conversion.

See #7431.
This commit is contained in:
John MacFarlane 2021-07-06 10:39:47 -07:00
parent f88ebf3ebf
commit e7f8cc5786
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
src/Text/Pandoc/PDF.hs
View file

@ -215,9 +215,9 @@ convertImage opts tmpdir fname = do
E.catch (Right pngOut <$ JP.savePngImage pngOut img) $
\(e :: E.SomeException) -> return (Left (tshow e))
where
pngOut = replaceDirectory (replaceExtension fname ".png") tmpdir
pdfOut = replaceDirectory (replaceExtension fname ".pdf") tmpdir
svgIn = tmpdir </> fname
pngOut = normalise $ replaceDirectory (replaceExtension fname ".png") tmpdir
pdfOut = normalise $ replaceDirectory (replaceExtension fname ".pdf") tmpdir
svgIn = normalise $ tmpdir </> fname
mime = getMimeType fname
doNothing = return (Right fname)