git.iko.soy/typeable/pandoc
on master help sign in
Make `--ascii` work properly with `--self-contained`.
5be6bf0John MacFarlane
src/pandoc.hs+1−1
compare with master
unifiedsplit
@@ -1060,7 +1060,7 @@ main = do
1060 Left err' -> err 43 $ toString err'
1060 Left err' -> err 43 $ toString err'
1061 Just w
1061 Just w
1062 | htmlFormat && ascii ->
1062 | htmlFormat && ascii ->
1063− writerFn outputFile =<< selfcontain (toEntities result)
1063+ writerFn outputFile . toEntities =<< selfcontain result
1064 | otherwise ->
1064 | otherwise ->
1065 writerFn outputFile =<< selfcontain result
1065 writerFn outputFile =<< selfcontain result
1066 where result = w writerOptions doc2 ++ ['\n' | not standalone']
1066 where result = w writerOptions doc2 ++ ['\n' | not standalone']