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

Fix compiler warning.

Browse source
This commit is contained in:
John MacFarlane 2018-09-20 21:29:08 -07:00
parent f57a8aa655
commit b7b93d7609
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/Text/Pandoc/Writers/ConTeXt.hs
View file

@ -456,7 +456,7 @@ inlineToConTeXt (Image attr@(_,cls,_) _ (src, _)) = do
-- Use / for path separators on Windows; see #4918 -- Use / for path separators on Windows; see #4918
fixPathSeparators = map $ \c -> case c of fixPathSeparators = map $ \c -> case c of
'\\' -> '/' '\\' -> '/'
c -> c _ -> c
src' = fixPathSeparators $ src' = fixPathSeparators $
if isURI src if isURI src
then src then src